VB考试题库二级习题含答案.docx
《VB考试题库二级习题含答案.docx》由会员分享，可在线阅读，更多相关《VB考试题库二级习题含答案.docx（40页珍藏版）》请在冰点文库上搜索。
VB考试题库二级习题含答案
VB考试一
1、能够获得一个文本框中被选取文本的内容的属性是______。
A：
SelStartB：
SelLengthC：
SelTextD：
Text
参考答案：
C
2、在窗体上画一个文本框,其名称为Text1,为了在程序运行后隐藏该文本框,应当使用的语句为：
______。
A：
Text1.Enabled=FalseB：
Text1.Hide
C：
Text1.ClearD：
Text1.Visible=False
参考答案：
D
3、对于语句Ifx=1Theny=1,下列说法正确的是____。
A：
x=1和y=1均为赋值语句
B：
x=1和y=1均为关系表达式
C：
x=1为赋值语句,y=1为关系表达式
D：
x=1为关系表达式,y=1为赋值语句
参考答案：
D
4、以下变量名中,______是不符合VisualBasic的命名规范的。
A：
_mnu_Open_234B：
Abc901C：
price_D：
K
参考答案：
A
5、MsgBox函数返回值的类型是__________。
A：
数值或字符串 B：
字符串 C：
变体 D：
整型数值
参考答案：
D
6、VB一共有设计、运行和中断三种模式,要使用调试工具应该______。
A：
进入中断模式 B：
进入运行模式
C：
进入设计模式 D：
不用进入任何模式
参考答案：
A
7、设a=6,则执行
x=IIF5,-1,0>后,x的值为______。
A：
-1B：
6 C：
0 D：
5
参考答案：
A
8、可以同时删除字符前导和尾部空白的函数是______。
A：
Mid B：
Rtrim C：
Trim D：
Ltrim
参考答案：
C
9、以下语句的输出结果是______。
PrintFormat$<"32548.5","000,000.00">
A：
32,548.5 B：
32548.5 C：
032,548.50 D：
32,548.50
参考答案：
C
10、设有如下声明：
DimXAsInteger
如果Sgn的值为-1,则X的值是______。
A：
等于0的整数 B：
大于0的整数 C：
整数 D：
小于0的整数
参考答案：
D
11、在窗体上画一个命令按钮,然后编写如下事件过程：
PrivateSubCommand1_Click<>
Fori=1To4
x=4
Forj=1To3
x=3
Fork=1To2
x=x+6
Nextk
Nextj
Nexti
Printx
EndSub
程序运行后,单击命令按钮,输出结果是______。
参考答案：
15#15#15#15
12、执行下面的程序段后,S的值为______。
s=5
Fori=2.6To4.9Step0.6
s=s+1
Nexti
参考答案：
9
13、下列表达式有错误,正确的写法应该是______。
[+c]/80-5÷
参考答案：
/80-5/#〔a+b+c/80-5/〔d+e
14、表示x是5的倍数或是9的倍数的逻辑表达式为__________
参考答案：
xMod5=0OrxMod9=0#xMod9=0OrxMod5=0
15、以下程序的功能是:
从键盘上输入若干个数字,当输入负数时结束输入,统计出若干数字的平均值,输出结果。
请填空。
PrivateSubForm_click<>
Dimx,yAsSingle
DimzAsInteger
x=InputBox<"Enterascore">
Dowhilex>=0
y=y+x
z=z+1
x=InputBox<"Enterascore">
Loop
Ifz=0Then
z=1
EndIf
y=______
Printy
EndSub
参考答案：
y/z
VB考试二
1、列表框中的列表项的数目可以通过以下哪个属性的值获得______。
A：
ListIndex B：
ListCount C：
Count D：
Index
参考答案：
B
2、在窗体上画一个名称为List1的列表框,一个名称为Label1的标签。
列表框中显示若干城市的名称。
当单击列表框中的某个城市名时,在标签中显示选中城市的名称。
下列能正确实现上述功能的程序是______。
A：
PrivateSubList1_Click<>
Label1.Caption=List1.Text
EndSub
B：
PrivateSubList1_Click<>
Label1.Name=List1.ListIndex
EndSub
C：
PrivateSubList1_Click<>
Label1.Name=List1.Text
EndSub
D：
PrivateSubList1_Click<>
Label1.Caption=List1.ListIndex
EndSub
参考答案：
A
3、在列表框中当前被选中的列表项的序号是由下列哪个属性表示______。
A：
Listindex B：
Index C：
List D：
Tabindex
参考答案：
A
4、为了清除列表框中的所有内容,应使用的方法是：
______。
A：
Clear B：
Remove C：
RemoveItem D：
Cls
参考答案：
A
5、在窗体上画一个名称为List1的列表框,为了对列表框中的每个项目都能进行处理,应使用的循环语句为______。
A：
Fori=1ToList1.ListCount
……
NEXT
B：
Fori=0ToList1.Count-1
……
NEXT
C：
Fori=0ToList1.ListCount-1
……
NEXT
D：
Fori=1ToList1.Count
……
NEXT
参考答案：
C
6、设有如下程序：
OptionBase0
PrivateSubForm_Click<>
Dima
DimiAsInteger
a=Array<1,2,3,4,5,6,7,8,9>
Fori=0To3
Printa<5-i>;
Next
EndSub
程序运行后,单击窗体,则在窗体上显示的是______。
A：
6 5 4 3 B：
5 4 3 2 C：
4 3 2 1 D：
7 6 5 4
参考答案：
A
7、设执行以下程序段时依次输入1、3、5,执行结果为______。
Dima<4>AsInteger,b<4>AsInteger
ForK=0To2
a=Val>
b<3-K>=a
NextK
Printb
A：
0 B：
3 C：
5 D：
1
参考答案：
D
8、在窗体上画一个名称为Command1的命令按钮,然后编写如下程序：
PrivateSubCommand1_Click<>
DimiAsInteger,jAsInteger
Dima<10,10>AsInteger
Fori=1To3
Forj=1To3
a=*3+j
Printa;
Nextj
Print
Nexti
EndSub
程序运行后,单击命令按钮,窗体上显示的是______。
A：
123
456
789
B：
234
345
456
C：
147
258
369
D：
123
246
369
参考答案：
A
9、用下面的语句所定义的数组的元素个数是：
______。
Dimarr<3To5,-2to2>
A：
24 B：
12 C：
15 D：
20
参考答案：
C
10、下列______语句可以为动态数组分配实际元素个数。
A：
static语句 B：
Dim语句 C：
public语句 D：
ReDim语句
参考答案：
D
11、假定程序中有以下语句：
answer=MsgBox<"String1",,"String2","String3",2>
执行该语句后,将显示一个信息框,此时如果单击"确定"按钮,则answer的值为：
______。
A：
String3 B：
String2 C：
String1 D：
1
参考答案：
D
12、设有语句
x=InputBox<"输入数值","0","示例">
程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是______。
A：
0是默认值
B：
变量X的值是字符串"10"
C：
在InputBox对话框标题栏中显示的是"示例"
D：
变量X的值是数值10
参考答案：
B
13、以下程序段运行的结果是：
______。
Dima<-1To5>AsBoolean
DimflagAsBoolean
flag=False
DimiAsInteger
DimjAsInteger
DoUntilflag=True
Fori=-1To5
j=j+1
Ifa=FalseThen
a=True
ExitFor
EndIf
Ifi=5Then
flag=True
EndIf
Next
Loop
Printj
A：
20B：
7 C：
8 D：
35
参考答案：
D
14、设a=5,b=6,c=7,d=8,则执行下列语句后,x的值为：
______。
x=IIF<b>And,10,20>
A：
300 B：
20 C：
30 D：
10
参考答案：
B
15、要将一个组合框设置为简单组合框〔SimpleCombo,则应将其Style属性设置为______。
A：
0 B：
1 C：
3 D：
2
参考答案：
B
VB考试三
1、设组合框Combo1中有3个项目,则以下能删除最后一项的语句是______。
A：
Combo1.RemoveItemCombo1.Listcount
B：
Combo1.RemoveItem2
C：
Combo1.RemoveItem3
D：
Combo1.RemoveItemText
参考答案：
B 题分：
6
2、在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序：
FunctionFunc
y=x*y
Ify>0Then
Func=x
Else
Func=y
EndIf
EndFunction
PrivateSubCommand1_Click<>
DimaAsInteger,bAsInteger
a=3
b=4
c=Func
Print"a=";a
Print"b=";b
Print"c=";c
EndSub
程序运行后,单击命令按钮,其输出结果为：
______。
A：
a=3
b=4
c=12
B：
a=13
b=12
c=12
C：
a=3
b=4
c=3
D：
a=3
b=12
c=3
参考答案：
D 题分：
6
3、单击命令按钮时,下列程序代码的执行结果为______。
PublicSubProcl
n=nMod10
m=m/10
EndSub
PrivateSubCommand1_Click<>
DimxAsInteger,yAsInteger
x=12:
y=34
CallProcl
Printx;y
EndSub
A：
12 3 B：
2 3 C：
12 34 D：
2 34
参考答案：
D 题分：
6
4、以下关于函数过程的叙述中,正确的是______。
A：
在函数过程中,过程的返回值可以有多个
B：
函数过程形参的类型与函数返回值的类型没有关系
C：
当数组作为函数过程的参数时,既能以传值方式传递,也能以传址方式传递
D：
如果不指明函数过程参数的类型,则该参数没有数据类型
参考答案：
B 题分：
6
5、以下说法错误的是______。
A：
函数过程可以带参数 B：
子过程没有返回值
C：
函数过程没有返回值 D：
子过程可以带参数
参考答案：
C 题分：
6
6、在窗体上画一个命令按钮〔名称为Command1,然后编写如下事件过程：
PrivateSubCommand1_Click<>
DimbAsInteger
b=b+1
EndSub
运行程序,三次单击命令按钮后,变量b的值是：
______。
A：
2 B：
1 C：
0 D：
3
参考答案：
B 题分：
6
7、假定有以下函数过程：
FunctionFunAsString
Dims1AsString
Fori=1ToLen
s1=UCase>+s1
Nexti
Fun=s1
EndFunction
在窗体上画一个命令按钮,然后编写如下事件过程：
PrivateSubCommand1_Click<>
DimStr1AsString,Str2AsString
Str1=InputBox<"请输入一个字符串">
Str2=Fun
PrintStr2
EndSub
程序运行后,单击命令按钮,如果在输入对话框中输入字符串"abcdefg"则单击"确定"按钮后在窗体上的输出结果为______。
A：
GFEDCBA
B：
ABCEDFG
C：
gfedcba
D：
abcdefg
参考答案：
A 题分：
6
8、Sub过程与Function过程最根本的区别是______。
A：
两种过程参数的传递方式不同
B：
Function过程可以有参数,Sub过程不可以
C：
Sub过程可以使用Call语句或直接使用过程名调用,而Function过程不可以
D：
Sub过程的过程名不能返回值,而Function过程能通过过程名返回值
参考答案：
D 题分：
6
9、在代码中定义了一个子过程：
SubP
...
EndSub
下面______调用该过程的格式是正确的。
A：
CallP
B：
CallP10,20
C：
P<10,20>
D：
CallP<10,20>
参考答案：
D 题分：
6
10、在窗体上画一个名称为Command1的命令按钮,然后编写如下程序：
PrivateSubCommand1_Click<>
StaticXAsInteger
StaticYAsInteger
Cls
Y=1
Y=Y+5
X=5+X
PrintX,Y
EndSub
程序运行时,三次单击命令按钮Command1后,窗体上显示的结果为______。
A：
15 15
B：
15 6
C：
15 16
D：
5 6
参考答案：
B 题分：
6
11、设有以下循环结构
Do
循环体
LoopWhile<条件>
则以下叙述中错误的是______。
A：
循环体中可以使用ExitDo语句
B：
"条件"可以是关系表达式、逻辑表达式或常数
C：
若"条件"是一个为0的常数,则一次也不执行循环体
D：
如果"条件"总是为True,则不停地执行循环体
参考答案：
C 题分：
6
12、在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程：
PrivateFunctionfun
IfmMod2=0Then
fun=2
Else
fun=1
EndIf
EndFunction
PrivateSubCommand1_Click<>
DimiAsInteger,sAsInteger
s=0
Fori=1To5
s=s+fun
Next
Prints
EndSub
程序运行后,单击命令按钮,在窗体上显示是______。
A：
7 B：
6 C：
8 D：
9
参考答案：
A 题分：
6
VB考试四
1、某人编写了如下程序,用来求10个整数〔整数从键盘输入中的最大值：
PrivateSubCommand1_Click<>
Dima<10>AsInteger,maxAsInteger
Fork=1To10
a=InputBox<"输入一个整数">
Nextk
max=0
Fork=1To10
Ifa>maxThen
max=a
EndIf
Nextk
Printmax
EndSub
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。
下面的修改中可以得到正确运行结果的是______。
A：
把max=a改为a=max
B：
把Ifa>maxThen改为Ifa C：
把第2个循环语句Fork=1To10改为Fork=2To10
D：
把max=0改为max=a<10>
参考答案：
D
2、设有语句：
Open"d:
\Test.txt"ForOutputAs#1,以下叙述中错误的是______。
A：
执行该语句后,就可以通过Print#语句向文件Test.txt中写入信息
B：
用该语句建立的文件的文件号为1
C：
该语句打开d盘根目录下一个已存在的文件Test.txt,之后就可以从文件中读取信息
D：
若d盘根目录下无Test.txt文件,则该语句创建此文件
参考答案：
C
3、工程中有2个窗体,名称分别为Form1、Form2,Form1为启动窗体,该窗体上有命令按钮Command1。
要求程序运行后单击该命令按钮时显示Form2,则按钮Click事件过程应该是______。
A：
PrivateSubCommand1_Click<>
Form2.Load
EndSub
B：
PrivateSubCommand1_Click<>
Form2.Visible
EndSub
C：
PrivateSubCommand1_Click<>
Load Form2
EndSub
D：
PrivateSubCommand1_Click<>
Form2.Show
EndSub
参考答案：
D
4、在窗体上画一个名为Command1的命令按钮,然后编写如下代码：
OptionBase1
PrivateSubCommand1_Click<>
Dima
a=Array<1,2,3,4>
j=1
Fori=4To1Step-1
s=s+a*j
j=j*10
Nexti
Prints
EndSub
运行上面的程序,其输出结果是______。
A：
12
B：
1234
C：
34
D：
4321
参考答案：
B
5、设在窗体中有一个名称为List1的列表框,其中有若干个项目〔如图。
要求选中某一项后单击Command1按钮,就删除选中的项,则正确的事件过程是______。
A：
PrivateSubCommand1_Click<>
List1.ClearList1.ListIndex
EndSub
B：
PrivateSubCommand1_Click<>
List1.Clear
EndSub
升级会员 