计算机二级VB考试题及答案
1.设有如下程序段：
x=2
Forc=1To4Step2
x=x+c
Nextc
运行以上程序后，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
PrintFormat(a,"000.00")
A.0,009.86
B.9.86
C.009.86
D.0,009.86
4.在窗体上画一个名称为CommandDialog1的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程：
PrivateSubCommand1_Click()
CommonDialog1.FileName=""
CommonDialog1.Filter="Allfile|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"
CommonDialog1.FilterIndex=1
CommonDialog1.DialogTitle="VBTest"
CommonDialog1.Action=1
EndSub
对于这个程序，以下叙述中错误的是(D)(单)
A.该对话框被设置为"打开"对话框
B.在该对话框中指定的文件名为空
C.该对话框的标题为VBTest
D.在该对话框中指定的默认文件类型为文本文件(*.Txt)
5.设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下：
PrivateSubCommand1_Click()
DimaAsInteger
a=10
Callg(Form2,a)
EndSub
PrivateSubg(fAsForm,xAsInteger)
y=Iif(x>10,100,-100)
f.Show
f.Caption=y
EndSub
运行以上程序，正确的结果是(B)(单)
A.Form1的Caption属性值为100
B.Form2的Caption属性值为-100
C.Form1的Caption属性值为-100
D.Form2的Caption属性值为100
6.在窗体上画一个名称为Command1的命令按钮，并编写如下程序：
PrivateSubCommand1_Click()
DimxAsInteger
StaticyAsInteger
x=10
y=5
Callf1(x,y)
Printx,y
EndSub
PrivateSubf1(ByRefx1AsInteger,y1AsInteger)
x1=x1+2
y1=y1+2
EndSub
程序运行后，单击命令按钮，在窗体上显示的内容是(D)(单)
A.105
B.125
C.107
D.127
7.OptionBase1
PrivateSubCommand1_Click()
Dima(10)AsInteger
DimnAsInteger
n=3
Ifn<10Then
CallGetArray(a,n)
EndIf
EndSub
PrivateSubGetArray(b()AsInteger,nAsInteger)
Dimc(10)AsInteger
j=0
Fort=1Ton
b(t)=Rnd*100
Ifb(t)/2=b(t)2Then
j=j+1
c(j)=b(t)
EndIf
Nextt
Printj
EndSub
以下叙述中错误的是(C)(单)
A.数组b中的数范围为0-100
B.c数组下标的下界从1开始
C.GetArray过程的参数n是按值传送的
D.语句Ifb(t)/2=b(t)2Then是判断数组b中元素的值是否为整数
8.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
OptionBase1
PrivateSubCommand1_Click()
Dima
a=Array(1,2,3,4,5)
Forc=1ToUbound(a)
a(c)=a(c)+c-1
Nextc
Printa(3)
EndSub
程序运行后，单击命令按钮，则在窗体上显示的内容是(B)(单)
A.4
B.5
C.6
D.7
9.阅读程序：
OptionBase1
PrivateSubForm_Click()
Dimarr
DimSum%
Sum=0
arr=Array(1,3,5,7,9)
Fort=1To5
Sum=Sum+arr(t)
Nextt
PrintSum
EndSub
程序运行后，单击窗体，输入结果为(B)(单)
A.5
B.9
C.25
D.15
10.在窗体上画一个名称为File1的文件列表框，并编写如下程序：
PrivateSubFile1_DblClick()
x=Shell(File1.FileName,1)
EndSub
以下关于该程序的叙述中，错误的是(A)(单)
A.x没有实际作用，因此可以将该语句写为：CallShell(File1,FileName,1)
B.双击文件列表框中的文件，将触发该事件过程
C.要执行的文件的名字通过File1.FileName指定
D.File1中显示的是当前驱动器、当前目录下的文件
11.在窗体上画一个名称为Label1、标题为"VisualBasic考试"的标签，两个名称分别为Command1和Command2、标题分别为"开始"和"停止"的命令按钮，然后画一个名称为Timer1的.计时器控件，并把其Interval属性设置为500。编写如下程序：
PrivateSubForm_Load()
Timer1.Enabled=False
EndSub
PrivateSubCommand1_Click()
Timer1.Enabled=True
EndSub
PrivateSubTimer1_Timer()
IfLabel1.Left<Form1.WidthThen
Label1.Left=Label1.Left+20
Else
Label1.Left=0
EndIf
EndSub
程序运行后，单击"开始"按钮，标签在窗体中移动。对于这个程序，以下叙述中错误的是(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.VisualBasic程序中分隔各语句的字符是(B)(单)
A.′
B.:
C.
D._
16.假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为"VBTest"的语句为(B)(单)
A.Form1="VBTest"
B.Caption="VBTest"
C.Form1.Text="VBTest"
D.Form1.Name="VBTest"
17.下列不能打开代码窗口的操作是(D)(单)
A.双击窗体上的某个控件双击
B.双击窗体
C.按F7键
D.单击窗体或控件
18.VisualBasic程序中语句行的续行符是(D)(单)
A.′
B.:
C.
D._
19.VisualBasic程序中的注释所使用的字符是(A)(单)
A.′
B.:
C.
D._
20.下列说法中正确的是：为了保存一个VisualBasic应用程序，应当(D)(单)
A.只保存窗体模块文件(.frm)
B.只保存工程文件(.vbp)
C.分别保存工程文件和标准模块文件(.bas)
D.分别保存工程文件、窗体文件和标准模块文件
