不论从事何种工作，如果要想做出高效、实效，务必先从自身的工作计划开始。有了计划，才不致于使自己思想迷茫、头脑空洞，不知从哪里着手开展工作。下面是小编搜索整理的计算机二级VB考试题及答案，供大家参考学习！
计算机二级VB考试题及答案
1.设有如下程序段：
x=
2For c=1 To 4 Step 2
x=x+c
Next c
运行以上程序后，x的值是(A)(单)
A.6
B.7
C.8
D.9
2.以下叙述中错误的是(A)(单)
A.在KeyPre事件过程中不能识别键盘键的按下与释放
B.在KeyPre事件过程中不能识别回车键
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=
1CommonDialog1.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=
5Call 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=
3If n
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.
4B.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.在窗体上画一个名称为Label
1、标题为\"VisualBasic考试\"的标签，两个名称分别为Command1和Command
2、标题分别为\"开始\"和\"停止\"的命令按钮，然后画一个名称为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
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.按快捷键F
4B.点击工具栏中的\"属性列表框\"按钮
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.分别保存工程文件、窗体文件和标准模块文件
