VB考试题库二级习题含答案教学内容.docx
《VB考试题库二级习题含答案教学内容.docx》由会员分享,可在线阅读,更多相关《VB考试题库二级习题含答案教学内容.docx(38页珍藏版)》请在冰豆网上搜索。
VB考试题库二级习题含答案教学内容
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=IIF(a>5,-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(X)的值为-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、下列表达式有错误,正确的写法应该是______。
[(a+b)+c]/80-5÷(d+e)
参考答案:
(a+b+c)/80-5/(d+e)#(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(K+1)=Val(InputBox("请输入数据"))
b(3-K)=a(K+1)
NextK
Printb(K)
A:
0 B:
3 C:
5 D:
1
参考答案:
D
8、在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
PrivateSubCommand1_Click()
DimiAsInteger,jAsInteger
Dima(10,10)AsInteger
Fori=1To3
Forj=1To3
a(i,j)=(i-1)*3+j
Printa(i,j);
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(i)=FalseThen
a(i)=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((a>b)And(c 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(ByValxAsInteger,yAsInteger)
y=x*y
Ify>0Then
Func=x
Else
Func=y
EndIf
EndFunction
PrivateSubCommand1_Click()
DimaAsInteger,bAsInteger
a=3
b=4
c=Func(a,b)
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(nAsInteger,ByValmAsInteger)
n=nMod10
m=m/10
EndSub
PrivateSubCommand1_Click()
DimxAsInteger,yAsInteger
x=12:
y=34
CallProcl(x,y)
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、假定有以下函数过程:
FunctionFun(SAsString)AsString
Dims1AsString
Fori=1ToLen(S)
s1=UCase(Mid(S,i,1))+s1
Nexti
Fun=s1
EndFunction
在窗体上画一个命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
DimStr1AsString,Str2AsString
Str1=InputBox("请输入一个字符串")
Str2=Fun(Str1)
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(a,b)
...
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(ByValmAsInteger)
IfmMod2=0Then
fun=2
Else
fun=1
EndIf
EndFunction
PrivateSubCommand1_Click()
DimiAsInteger,sAsInteger
s=0
Fori=1To5
s=s+fun(i)
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(k)=InputBox("输入一个整数")
Nextk
max=0
Fork=1To10
Ifa(k)>maxThen
max=a(k)
EndIf
Nextk
Printmax
EndSub
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。
下面的修改中可以得到正确运行结果的是______。
A:
把max=a(k)改为a(k)=max
B:
把Ifa(k)>maxThen改为Ifa(k) 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(i)*j
j=j*10
Nexti
Prints
EndSub
运行上面的程序,其输出结果是______。
A:
12
B:
1234
C:
34
D:
4