点击查看：2018年12月计算机二级VB考试提分试题及答案汇总

　　1.设有如下程序段：

　　x=2

　　For c=1 To 4 Step 2

　　x=x+c

　　Next c

　　运行以上程序后，x的值是(A)

　　A.6

　　B.7

　　C.8

　　D.9

　　2.以下叙述中错误的是(A)

　　A.在KeyPress事件过程中不能识别键盘键的按下与释放

　　B.在KeyPress事件过程中不能识别回车键

　　C.在KeyDown和KeyUp事件过程中，从键盘输入的字母"A"和字母"a"对应的KeyCode视作相同的字母

　　D.在KeyDown和KeyUp事件过程中，从大键盘上输入的"1"和从右侧小键盘上输入的"1"被视作不同的字符

　　3.执行如下两条语句，窗体上显示的是(C)

　　A=9.8596

　　Print Format(a,"000.00")

　　A.0,009.86

　　B.9.86

　　C.009.86

　　D.0,009.86

　　4.在窗体上画一个名称为CommandDialog1 的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程：

　　Private Sub Command1_Click( )

　　CommonDialog1.FileName =""

　　CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"

　　CommonDialog1.FilterIndex=1

　　CommonDialog1.DialogTitle="VBTest"

　　CommonDialog1.Action=1

　　End Sub

　　对于这个程序，以下叙述中错误的是(D)

　　A.该对话框被设置为"打开"对话框

　　B.在该对话框中指定的文件名为空

　　C.该对话框的标题为VBTest

　　D.在该对话框中指定的默认文件类型为文本文件(*.Txt)

　　5.设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下：

　　Private Sub Command1_Click( )

　　Dim a As Integer

　　a=10

　　Call g(Form2,a)

　　End Sub

　　Private Sub g(f As Form,x As Integer)

　　y=Iif(x>10,100,-100)

　　f.Show

　　f.Caption=y

　　End Sub

　　运行以上程序，正确的结果是(B)

　　A.Form1的Caption属性值为100

　　B.Form2的Caption属性值为-100

　　C.Form1的Caption属性值为-100

　　D.Form2的Caption属性值为100

　　6.在窗体上画一个名称为Command1的命令按钮，并编写如下程序：

　　Private Sub Command1_Click( )

　　Dim x As Integer

　　Static y As Integer

　　x=10

　　y=5

　　Call f1(x,y)

　　Print x,y

　　End Sub

　　Private Sub f1(ByRef x1 As Integer, y1 As Integer)

　　x1=x1+2

　　y1=y1+2

　　End Sub

　　程序运行后，单击命令按钮，在窗体上显示的内容是(D)

　　A.10 5

　　B.12 5

　　C.10 7

　　D.12 7

　　7.Option Base 1

　　Private Sub Command1_Click( )

　　Dim a(10) As Integer

　　Dim n As Integer

　　n=3

　　If n<10 Then

　　Call GetArray(a,n)

　　End If

　　End Sub

　　Private Sub GetArray(b( ) As Integer,n As Integer)

　　Dim c(10) As Integer

　　j=0

　　For t=1 To n

　　b(t)=Rnd*100

　　If b(t)/2=b(t)\2 Then

　　j=j+1

　　c(j)=b(t)

　　End If

　　Next t

　　Print j

　　End Sub

　　以下叙述中错误的是(C)

　　A.数组b中的数范围为0-100

　　B.c数组下标的下界从1开始

　　C.GetArray过程的参数n是按值传送的

　　D.语句If b(t)/2=b(t)\2 Then 是判断数组b中元素的值是否为整数

　　8.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

　　Option Base 1

　　Private Sub Command1_Click( )

　　Dim a

　　a= Array(1,2,3,4,5)

　　For c=1 To Ubound(a)

　　a(c) = a(c)+c-1

　　Next c

　　Print a(3)

　　End Sub

　　程序运行后，单击命令按钮，则在窗体上显示的内容是(B)

　　A.4

　　B.5

　　C.6

　　D.7

　　9.阅读程序：

　　Option Base 1

　　Private Sub Form_Click( )

　　Dim arr

　　Dim Sum%

　　Sum = 0

　　arr = Array(1, 3, 5, 7, 9)

　　For t = 1 To 5

　　Sum = Sum + arr(t)

　　Next t

　　Print Sum

　　End Sub

　　程序运行后，单击窗体，输入结果为(B)

　　A.5

　　B.9

　　C.25

　　D.15

　　10.在窗体上画一个名称为File1的文件列表框，并编写如下程序：

　　Private Sub File1_DblClick( )

　　x=Shell(File1.FileName,1)

　　End Sub

　　以下关于该程序的叙述中，错误的是(A)

　　A.x没有实际作用，因此可以将该语句写为：Call Shell(File1,FileName,1)

　　B.双击文件列表框中的文件，将触发该事件过程

　　C.要执行的文件的名字通过File1.FileName指定

　　D.File1中显示的是当前驱动器、当前目录下的文件

　　11.在窗体上画一个名称为Label1、标题为"VisualBasic考试"的标签，两个名称分别为Command1和Command2、标题分别为"开始"和"停止"的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500。编写如下程序：

　　Private Sub Form_Load( )

　　Timer1.Enabled=False

　　End Sub

　　Private Sub Command1_Click( )

　　Timer1.Enabled=True

　　End Sub

　　Private Sub Timer1_Timer( )

　　If Label1.Left< Form1.Width Then

　　Label1.Left = Label1.Left + 20

　　Else

　　Label1.Left=0

　　End If

　　End Sub

　　程序运行后，单击"开始"按钮，标签在窗体中移动。 对于这个程序，以下叙述中错误的是(A)

　　A.标签的移动方向为自右向左

　　B.单击"停止"按钮后再单击"开始"按钮，标签从停止的位置继续移动

　　C.当标签全部移出窗体后，将从窗体的另一端出现并重新移动

　　D.标签按指定的时间时隔移动

　　12.规范地说，VB是一种(A)的开发工具

　　A.面向对象

　　B.面向用户

　　C.面向屏幕

　　D.面向窗体

　　13.VB6设计界面包含多个视窗，控制这些视窗显示或关闭的命令包含在(D)下拉菜单中

　　A.文件

　　B.工程

　　C.编辑

　　D.视图

　　14下面(D)操作不是激活或显示属性列表框的操作

　　A.按快捷键F4

　　B.点击工具栏中的"属性列表框"按钮

　　C.选择"视图"下拉菜单的"属性窗口"项

　　D.双击窗体中的某一对象

　　15.Visual Basic程序中分隔各语句的字符是(B)

　　A.′

　　B.:

　　C.\

　　D._

　　16.假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为"VB Test"的语句为(B)

　　A.Form1 = "VB Test"

　　B.Caption ="VB Test"

　　C.Form1.Text = "VB Test"

　　D.Form1.Name ="VB Test"

　　17.下列不能打开代码窗口的操作是(D)

　　A.双击窗体上的某个控件双击

　　B.双击窗体

　　C.按F7键

　　D.单击窗体或控件

　　18.Visual Basic程序中语句行的续行符是(D)

　　A.′

　　B.:

　　C.\

　　D. _

　　19.Visual Basic程序中的注释所使用的字符是(A)

　　A.′

　　B.:

　　C.\

　　D._

　　20.下列说法中正确的是：为了保存一个Visual Basic应用程序，应当(D)

　　A.只保存窗体模块文件(.frm)

　　B.只保存工程文件(.vbp)

　　C.分别保存工程文件和标准模块文件(.bas)

　　D.分别保存工程文件、窗体文件和标准模块文件

　　21.为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为(B)

　　A.1

　　B.2

　　C.3

　　D.4

　　22.下列说法中正确的是：为了载入一个只有一个工程(此工程下有三个窗体)的Visual Basic应用程序，应当(B)

　　A.只装入窗体模块文件(.frm)

　　B.先装入工程文件(.vbp)即可

　　C.分别装入工程文件和标准模块文件(.bas)

　　D.分别装入工程文件、窗体文件和标准模块文件

　　23.要使一个标签能够显示所需要的文本，应设置该标签的(A)属性的值

　　A.Caption

　　B.Name

　　C.Text

　　D.AutoSize

　　24.要使一个命令按钮上有图形，应该设置该按钮的(A)属性值，同时设置它的style属性为1

　　A.Picture

　　B.Style

　　C.DownPicture

　　D.DisabledPicture

　　25.为使计时器对象每隔5秒钟产生一个时钟事件(Timer事件)，则其Interval属性值应设置为(D)

　　A.5

　　B.300

　　C.500

　　D.5000

　　26一个标准的VB应用程序至少要包含一个(C)对象

　　A.文本框

　　B.标签框

　　C.窗体

　　D.命令按钮

　　27.要使一个文本框对象能够显示多行文字，应设置该对象的(B)属性值为True

　　A.Text

　　B.MultiLine

　　C.Style

　　D.Visible

　　28.下列的(A)对象支持KeyPress事件

　　A.文本框

　　B.命令按钮

　　C.标签框

　　D.图像框

　　29.若要将窗体从内存中卸载，其实现的方法或语句是(B)

　　A.Show

　　B.Unload

　　C.Load

　　D.Hide

　　30.以下选项中，不是VB标准控件的是(C)

　　A.命令按钮

　　B.定时器

　　C.通用对话框

　　D.单选框

　　相关推荐：

　　2018年全国计算机等级考试必做试题汇总(各科目)

　　2018年全国计算机等级考试复习知识点汇总(各科目)

　　2018全国计算机等级考试备考经验及应试技巧汇总