vb试题及答案.docx
《vb试题及答案.docx》由会员分享，可在线阅读，更多相关《vb试题及答案.docx（16页珍藏版）》请在冰点文库上搜索。
vb试题及答案
vb试题及答案
LT
的窗口是：
c
A．项目（工程）窗口B．工具箱C．代码窗口D．属性窗口
10、用于获得字符串s最左边4个字符的函数是：
a
A．Left（s,4）B．Left（1,4）C．LeftStr（s）D．LeftStr（3,4）
11、以下程序段的输出结果是：
d
a=Sqr（3）
b=Sqr
（2）
c=a>b
Printc
A．-1B．0C．FalseD．True
12、用下面语句定义的数组的元素个数是：
c
DimA（-4to6）AsInteger
A．6B．7C．11D．9
13、若x=-5，执行IfxThenx=0Elsex=1的结果为：
d
A．实时错误B．编译错误C．x=1D．x=0
列程序段的循环结构执行后，i的输出值是：
c
Fori=1To10Step2
y=y+i
Nexti
Printi
A．25B．10C．11D．因为y的初值不知道，所以不确定
15、可以用作其他控件容器的控件有：
c
A．窗体、列表框、图像框
B．窗体、文本框、框架
C．窗体、框架、图片框
D．窗体、标签、图片框
16、以下不属于VisualBasic支持的循环结构的是：
d
A．For…NextB．ForEach…Next
C．Do…LoopD．While…End
17、下列可以打开立即窗口的操作是：
D
A．Ctrl+DB．Ctrl+EC．Ctrl+FD．Ctrl+G
18、下列可作为VisualBasic变量名的是
A）A_3B）4AC）?
xyD）Integer
19、设a=8，b=5，执行语句Printa>b后，窗体上显示的是
A）TrueB）FalseC）1D）出错信息
20、以下能够触发文本框Change事件的操作是
A）文本框失去焦点B）文本框获得焦点
C）设置文本框的焦点D）改变文本框的内容
21、列表框图标的英文名称是
A）ListBoxB）ComboBox
C）FrameD）CommonDialog
22、下列类型说明符中表示整型的是
A）%B）!
C）$D）&
23、执行下列语句a$="abcdefg":
PrintLen（a$）后，在窗体上输出的结果是
A）1B）2C）7D）14
24、文本框不具有的属性是
A）CaptionB）textC）leftD）font
25、设a=6，则执行x=IIf（a>5,1,2）后，x的值为：
A）1B）2C）5D）0
26、语句Print5/4*6\5Mod2的输出结果是
A）0B）1C）2D）3
27、滚动条控件的largeChange属性所设置的是
A）滚动条所能表示的最小值
B）滚动条所能表示的最大值
C）单击滚动条中滚动框前面或后面的部位时，Value属性增加或减小的增量值
D）单击滚动条两端的箭头时，Value属性增加或减小的增量值
28、按钮控件数组元素是：
c
A．共享一个事件过程的B．只共享一个Click事件过程的
C．共享该控件的所有事件过程D．各自有自己的部分事件过程
有如下的记录类型
Typestudent
idAsString
nameAsString
ageAsInteger
EndType
则正确引用该记录类型变量的代码是：
B
A．student.name=”Sias”
B．DimsAsstudent
s.mane=”Sias”
C．DimsAstypestudent
s.name=”Sias”
D．DimsAstype
s.name=”Sias”
有如下语句：
d
str1=InputBox（“输入”,””,”联系”）
从键盘上输入字符串“学生”后，str1的值为：
A．“输入”B．“”C．“联系”D．“学生”
31、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
C
PrivateSubCommand1_Click（）
s=2
Forn=1To6
IfnMod3<>0Thens=s+1
Nextn
Prints
EndSub
程序运行后，如果单击命令按钮，则窗体上显示的内容是
A）2B）5C）7D）6
32、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
B
PrivateSubCommand1_Click（）
DimnumAsInteger
num=1
DoUntilnum>6
num=num+2
Loop
Printnum
EndSub
程序运行后，单击命令按钮，则窗体上显示的内容是
A）6B）7C）8D）9
33、在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：
OptionBase0
PrivateSubCommand1_Click（）
DimkmAsVariant
km=Array（"音乐","体育","化学","物理"）
Printkm
（2）
EndSub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是
A）音乐B）体育C）化学D）物理
34、以下程序代码正确的是：
A）Ifa=1Thenb=0Elsec=0EndIf
B）Ifa=1Then:
b=0:
ElseIfc=0EndIf
C）Ifa=1Then
b=0
Else
c=0
EndIf
D）Ifa=1Then
b=0
ElseIfc=0
d=0
EndIf
35、在窗体中添加一个命令按钮Command1，并编写如下程序：
PrivateSubCommand1_Click（）
dimxasinteger
x=InputBox（"x"）
Ifx^2=9Theny=x
Ifx^2<9Theny=1/x
Ifx^2>9Theny=x^2+1
Printy
EndSub
程序运行后，在输入对话框中输入3，单击命令按钮，程序的运行结果是
A．3B．0.33C．17D．0.25
36、以下关于过程及过程参数的描述中，错误的是
A）过程的参数可以是控件名称
B）用数组作为过程的参数时，使用的是“传地址”方式
C）只有函数过程能够将过程中处理的信息传回到调用的程序中
D）窗体可以作为过程的参数
37、在窗体上添加一个命令按钮，名为command1，事件过程为：
PrivateSubcommand1_Click（）
x=0
DoUntilc=-1
a=val（InputBox（“输入a的值”））
b=val（InputBox（“输入b的值”））
c=val（InputBox（“输入c的值”））
Loop
Printa
EndSub
程序运行后，单击命令按钮，依次在输入对话框中输入5，4，3，2，1，-1后，输出的结果是a
A．2B．3C．4D．5
38、窗体有一个名为text1的文本框，执行如下语句后，文本框中的内容为：
C
Forj=1To3
x=3
Fork=1To2
x=x+3
Nextk
Nextj
text1.Text=Str（x）
A．3B．6C．9D．12
39、以下定义数组或给数组元素赋值的语句中，正确的是
A）DimaAsVariant
a=Array（1,2,3,4,5）
B）Dima（10）AsInteger
a=Array（1,2,3,4,5）
C）Dima%（10）
a
（1）="ABCDE"
D）Dima（3）,b（3）AsInteger
a（0）=0
a
（1）=1
a
（2）=2
b=a
40、在窗体上画一个命令按钮，名称为Command1，单击命令按钮时，执行如下事件过程：
PrivateSubCommand1_Click（）
a$="MicrosoftVisualBasic"
b$=Mid（a$,1,9）
c$=Right（a$,5）
MsgBoxa$,,b$,c$,1
EndSub
则在弹出的信息框的标题栏中显示的信息是
A）VisualB）MicrosoftC）BasicD）1
41、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
D
OptionBase1
PrivateSubCommand1_Click（）
DimsAsInteger
Dimaa（3,2）AsInteger
Fori=1To3
Forj=1To2
aa（i,j）=i+j
Nextj
Nexti
s=aa（1,2）+aa（2,1）
Prints
EndSub
程序运行后，单击命令按钮，窗体上显示的值是
A）4B）5C）6D）7
42、以下叙述中错误的是d
双击鼠标可以触发DblClick事件
控件的名称可以由编程人员设定
文本框可以获得焦点
窗体或控件的事件过程的名称可以由编程人员确定
43、设窗体上有一个列表框控件List1，且其中含有若干列表项。
则以下能表示当前被选中的列表项内容的是
A）List1.ListB）List1.ListIndex
C）List1.TextD）List1.Index
44、PrivateSubCommand1_Click（）
dimIasinteger
dimxasinteger
x=0
ForI=1to5
x=x+2
Ifx>4Thenexitfor
nextI
printx
EndSub
程序运行后，单击命令按钮，窗体上显示的是
A）1B）6C）5D）7
45、有如下定义
Subtest（a（）,b（））
…
EndSub
下列调用语句中正确的是：
A）calltest（a（）,b（））B）calltesta（）,b（）
C）calltesta（）D）test（a（）,b（））
二、填空题（每空2分，共40分）
（1）假定一个文本框的Name属性为Text1，为了在该文本框中显示“Hello!
”，应使用什么语句【1】。
（Text1.Text="Hello!
"）
（2）哪两个属性确定一个控件的大小【2】（widthheight）
（3）在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程：
PrivateSubCommand1_Click（）
Text1.Text="sias"
Text2.Text=Text1.Text
Text1.Text="university"
EndSub
程序运行后，单击命令按钮，在文本框1中显示【3】（university），在文本框2中显示【4】（sias）。
（4）将此数学式子2a2（4+b）写成VisualBasic表达式【5】。
（2*a^2*（4+b））
（5）设a=2，b=3，c=4，d=5，
表达式a=cAndb<>cOrc>d的值【6】。
（False）
（6）写出下列语句的输出结果Print"st";"u","d"
【8】。
（stud）
（7）为了在运行时把c:
\ucdos文件夹下的图形文件arrow.ico装入图片框Picture1，所使用的语句为【9】。
Picture1.Picture=LoadPicture（"c:
\ucdos\arrow.ico"）
或Picture1=LoadPicture（"c:
\ucdos\arrow.ico"）
（8）在编写程序时，Command1.enabled=False此语句的作用是【10】。
（使命令按钮在运行时不可用）
（9）为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将Timer1控件的【11】interval属性设置为500。
（10）执行下面的程序段后，i的值为【12】【11】，s的值为【13】【6】。
s=2
Fori=3To10Step2
s=s+1
NextI
（11）编写如下事件过程
SubForm_Click（）
DimaAsInteger,bAsInteger
a=20:
b=30
tryouta,b
Print"a=";a,"b=";b
EndSub
Subtryout（xAsInteger,yAsInteger）
x=x+10
y=y*2
EndSub
单击窗体后，窗体上显示a和b的值，分别是a=【15】（30），b=【16】（60）
（12）设有如下程序：
OptionBase0
PrivateSubForm_Click（）
Dima
DimiAsInteger
a=array（1,2,3,4,5,6,7,8,9）
Fori=2to5
Printa（5-i）;
Next
EndSub
程序运行后，单击窗体，则在窗体上显示的是【18】（4321
（13）程序段
StaticarrAsVariant
arr=Array（“a”,”b”,”c”,”d”,”e”,”f”）
Printarr（4）
执行的结果是输出：
e__（7）_______
（14）执行以下语句后，输出的结果是：
0（14）
s$=”student”
PrintInstr（s$,”DEN”）
（15）下列循环语句，要求和数达到或超过10即停止累加，退出循环：
Forj=1To20step2
s=s+j
Ifa>10ThenExitFor（11）_____
Nextj
（16）下列程序段用来计算2+4+6+…+20，请补充该程序
Dimi,s,kAsInteger
s=0:
k=0
Fori=20To2Step-2
k=k+1
s=s+k
Nexti
Prints
（17）执行下面程序段后，b的值为200（22）_______
a=200
b=40
a=a+b
b=a-b
a=a-b
（18）下列语句的输出结果是：
12345.68____（28）_______
Printint（12345.6789*100+0.5）/100
（19）命令按钮单击事件过程：
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
运行结果输出是：
1234__（23）_________
（20）命令按钮单击事件过程：
PrivateSubcommand1_Click（）
a=InputBox（“enterthefirstInteger”）
b=InputBox（“enterthesecondInteger”）
Printb+a
EndSub
程序运行后，单击命令按钮，在两个输入对话框中分别输入234和789，则输出的结果是：
789234_______（26）_______
三、判断题（判断下列正确与否，正确的打√，错误的打ⅹ。
）
1、三种方式的组合框都允许用户输入哪些不在列表框中的选项。
（Х）
2、图象框中的Stretch属性为true时，其作用是图形自动调整大小以适应图象控件。
（Х）
3、在菜单编辑器中使用“索引”时，可有一组菜单项具有相同的“名字”。
（Х）
4、通过改变属性窗口中的Name属性，来改变窗体的标题。
（√）
5、创建VB应用程序的三个主要步骤是：
（1）创建应用程序界面
（2）设置控件（3）编写代码。
（Х）
6、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。
（√）
7、已知P＝MsgBox（“Howareyou?
"，VbYesNo+VbQuestion，“Hello!
”），变量P是Integer数据类型。
（√）
8、工程文件的扩展名是.vbg。
（√）
9、VB允许设计和使用用户自己设计的控件。
（√）
10、OptionButton控件没有DblCliek事件。
（Х）
11、同一条记录中的各数据具有相同的类型。
（√）
12、使用Data控件可以直接显示数据库中的数据。
（Х）
13、ImageList是一个图像容器控件，可用作工具栏的图像库。
（√）
14、当用户单击工具栏按钮时，将触发工具栏按钮的ButtonClick事件。
（√）
15、在VB的工程资源管理器中，如果从工程中移除已经保存过的文件，该文件仍然被物理删除（真正删除）。
（Х）
16、如果列表框的ListConut的属性为10，则列表框最后一项的ListIndex值为10。
（Х）
17、要是某个命令按钮不起作用，应将该按钮的Enabeld属性设置为False。
（√）
18、使用数组定义语句：
DimD$（10），则数组D中各元素的值为空。
（Х）
19、如果在一行中输入多条语句，各语句之间用使用；分隔。
（Х）
升级会员 