VB测验试题及答案分解.docx
《VB测验试题及答案分解.docx》由会员分享，可在线阅读，更多相关《VB测验试题及答案分解.docx（27页珍藏版）》请在冰点文库上搜索。
VB测验试题及答案分解
VB测验试题及答案分解
————————————————————————————————作者：
————————————————————————————————日期：
卷1
一、 填空题
1、VB程序设计的主要特点是 可视化设计 和 事件编程 。
2、在VB中，最主要的两种对象是 窗体（form） 和 控件 。
3、工程是构成应用程序文件的 集合 。
4、方法是VB提供的一种 特殊子程序 ，用来完成一定的操作。
5、浮点类型数据包括单精度型和___双精度__数据。
6、事件是窗体或控件对象识别的__动作____。
7、可用窗体的__print_ 方法在窗体中显示文字。
8、复选框控件Value属性指示复选框处于____选中___或禁止状态（暗淡的）中的某一种。
9、在VB中，修改窗体的 高度（height）和 宽度（width） 属性值，可改变窗体的大小。
10、双击工具箱中的控件图标，可在窗体的 中央 出现一个尺寸为缺省值的控件。
11、在MsgBox函数中，如果缺省title参数，则使用 工程1 作为消息框的标题。
12、设x＝34.58，语句PrintFormat（x,“000.0”）的输出结果是 34.6 。
13、在VB 中，数值型变量的初值为 0 ，Varant型变量的初值为 空 ，布尔型变量的初值为 FALSE 。
14、设置窗体的 picture 属性，可在窗体上显示图片。
15、程序运行工程中，清除MP图片框中的图片应使用语句 cls 。
二、选择题
1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。
A、GotFocus B、Load C、Click D、KeyDown
2、滚动条控件（如图所示）的Max属性所设置的是 A 。
A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值
B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量
C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量
D、滚动条控件无该属性
3、SQL 语句 Select*Formstudent 中的 *表示 B 。
A、所有记录 B、所有字段 C、所有表 D、都不对
4、以下选项中，不属于标签的属性是 C 。
A、Enabled B、Caption C、Default D、Font
5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。
A、Caption B、Name C、Text D、Label
6、设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。
A、Caption B、Name C、Text D、Value
7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？
D 。
A、在标题项中输入&，然后打勾 B、在索引项中打勾
C、在有效项中打勾 D、在复选项中打勾
8、当执行以下过程时，在窗体上将显示 A 。
PrivateSubCommand1_Click（）
Print"VB";
Print"Hello!
";
Print"VB"
EndSub
A、 VBHello!
VB B、 VB
Hello!
VB
C、 VB D、 VB
Hello!
VB Hello!
VB
9、语句Print"Theansweris:
";20/4-2的结果为 B 。
A、Theansweris20/4-2 B、Theansweris3
C、Theansweris"20/4-2" D、非法语句
10、下列哪个控件是容器控件 B 。
A、Image B、Picture C、ComboBox D、FileListBox
11、若要将窗体从内存中卸载出去，其实现的方法是 D 。
A.Show B.Hide C.Load D.UnLoad
12、以下选项中，不是 VisualBasic控件的是 A 。
A.窗体 B.定时器 C.单选框 D.命令按钮
13、双击窗体中的对象后，VisualBasic将显示的窗口是 A 。
A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口
14、可决定窗体的左上角是否有控制菜单的属性是 A 。
A.ControlBox B.MinButton
C.MaxButton D.BorderStyle
15、设有如下语句：
Strl＝InputBox（"输人"，""，"练习"）
从键盘上输人字符“示例”后，Strl的值是 D 。
A．“输入” B．“” C．“练习” D．“示例”
16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。
A.Form1_Click B.Form_Click C.Frm1_Click D.Me_Click
17、窗体的hide属性的含义是 A 。
A.隐藏 B.展现 C.装入 D.卸载
18、若要设置定时器控件的定时时间，需设置的属性是 C 。
A．Enabled B．Value C．Interval D．Text
19、能够改变复选框中背景颜色的属性是 C 。
A．Value B．FontColor C．BackColor D．Font
20、窗体能响应的事件是 B 。
A．ActiveForm B．Load C．Drive D．Change
三、判断题（判断下列正确与否，正确的打√，错误的打ⅹ。
）
1、三种方式的组合框都允许用户输入哪些不在列表框中的选项。
X
2、图象框中的Stretch属性为true时，其作用是图形自动调整大小以适应图象控件。
X
3、在菜单编辑器中使用“索引”时，可有一组菜单项具有相同的“名字”。
X
4、通过改变属性窗口中的Name属性，来改变窗体的标题。
5、创建VB应用程序的三个主要步骤是：
（1）创建应用程序界面
（2）设置控件（3）编写代码。
X
6、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。
7、已知P＝MsgBox（“Howareyou?
"，VbYesNo+VbQuestion，“Hello!
”），变量P是Integer数据类型。
8、工程文件的扩展名是 .vbg 。
9、VB允许设计和使用用户自己设计的控件。
10、OptionButton控件没有DblCliek事件。
X
11、同一条记录中的各数据具有相同的类型。
12、使用Data控件可以直接显示数据库中的数据。
X
13、ImageList 是一个图像容器控件，可用作工具栏的图像库。
14、当用户单击工具栏按钮时，将触发工具栏按钮的ButtonClick事件。
15、在VB的工程资源管理器中，如果从工程中移除已经保存过的文件，该文件仍然被物理删除（真正删除）。
X
16、如果列表框的ListConut的属性为10，则列表框最后一项的ListIndex值为10。
X
17、要是某个命令按钮不起作用，应将该按钮的Enabeld属性设置为False。
18、使用数组定义语句：
DimD$（10），则数组D中各元素的值为空。
X
19、如果在一行中输入多条语句，各语句之间用使用；分隔。
X
20、在代码窗口中输入某行代码并按回车键之后，如果代码变成红色，说明该行代码有语法错误。
四、读程序题，写出程序运行结果
1、 PrivateSubForm_Click（）
StaticSUMAsInteger
I=1
DoWhileI<=10
SUM=SUM+I
I=I+1
Loop
PrintSUM
EndSub
运行程序，第一次单击窗体：
55
第二次单击窗体：
110
2、 PrivateSubForm_Click（）
Print"*";Tab（6）;2,Tab（15）;5
Print
ForI=15To16
PrintI;
Forj=2To6Step3
PrintTab（3*j）;j*I;
Nextj
Print
NextI
EndSub
程序运行结果：
* 2 5
15 30 75
16 32 80
五、编程题
（一）窗体中有图片框（Picture1）和计时器（Timer1）两个控件，运行程序时，将图片加载到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下脚移动，每次向左、向右移动100twip（20分之一像素）。
请填空：
PrivateSub Form_load（）
Picture1.picture =loadPicture（“c:
\pic\ball.ico”）
Timer1 .Interval=200
End Sub
Private Sub Timer1_Timer（）
Static x,y As Integer
x=x+100
y=y+100
Picture1.Move x,y
End Sub
（二）有一个单击按钮过程，其作用是产生50个60～100的随机数，统计其中被6整除余2的个数，并将这些数输出。
请填空：
PrivateSubCommand1_Click（）
Dim x As Integer, N%
Dim Counter As Integer
randomize Timer
For N=1 To50
X=Rnd（）* rnd（）*41+60
If x Mod 6 =2 Then
Print x
Counter= Counter+1
Endif
Next N
Print Counter
End Sub
卷2
第一部分：
客观题
一、单项选择题
1、在窗体模块的通用段中声明变量时，不能使用的关键字是（）
A、DimB、PublicC、PrivateD、Static
2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（ ）
A、工程资源管理器窗口B、工具箱窗口
C、属性窗口D、代码窗口
3、若要使某可见控件获得焦点，可使用（）方法来实现。
Ａ、Refresh Ｂ、Setfocus Ｃ、Gotfocus Ｄ、Value
4、下列不可作为VB变量名的是（ ）
A、ABT1B、AlphaC、ABCD、4*Delta
5、表达式5Mod3+3\5*2的值是（ ）
A、0B、6C、4D、2
6、下列语句中，正确的赋值语句是（）
A、i+j=10B、2i=jC、j=i+jD、i*j=0
7、执行下列程序段后，x的值是（）。
n=4:
x=1:
i=1
Do
x=x*i
i=i+1
LoopWhileiA、2B、6C、10D、14
8、当用户在窗体上单击鼠标时，不会触发的事件是（ ）
Ａ、Click Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick
9、下列为整型变量的是（）
A、x!
B、x#C、x$D、x%
10、要从For循环中直接退出循环，可使用的语句（）。
A、ExitDoB、ExitLoopC、ExitForD、Stop
11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是（ ）
A、xMod2=1OryMod2=1B、xMod2=0OryMod2=0
C、xMod2=0AndyMod2=0D、xMod2=1AndyMod2=1
12、在通用声明中给出OptionBase1语句，则数组a包含（）个数组元素。
Dima（3,-2To1,5）AsInteger
A、60B、75C、120D、13
13、设窗体上有一个名称为Text1的文本框，要求只能显示信息，不能输入，应选择答案（ ）
A、Text1.MaxLength=0B、Text1.Width=0
C、Text1.Visible=FalseD、Text1.Enabled=False
14、命令按钮CommandButton的Picture,DownPicture和DisablePicture属性都已装入图形,按下命令按钮,其上显示的图形是（）
A、Picture属性中的图形B、DownPicture属性中的图形
C、DisablePicture属性中的图形D、不显示图形
15、在窗体上画一个名称为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
程序运行后，单击命令按钮，在窗体上显示的内容是（ ）
A、105B、125C、107D、127
16、执行以下程序段，输出结果为（ ）
PrivateSubCommand1_Click（）
a$="abbacddcba"
Fori=6To2Step-2
X=Mid（a,i,i）
Y=Left（a,i）
z=Right（a,i）
z=UCase（x&y&z）
Nexti
Printz
EndSub
A、ABAB、ABBABAC、BBABBAD、AABAAB
17、以下（）语句可表示[50,100]之间的随机数。
A、Int（Rnd*51）+49B、Int（Rnd*51+50）
C、Int（Rnd*50）+5D、Int（Rnd*50+50）
18、执行x=InputBox（"请输入半径",0,"求面积"），在输入框中输入3后回车,则下列叙述正确的是（）
A、x的值是数值3B、x的值是字符"3"
C、0是默认值D、对话框标题是"求面积"
19、设置图像框的（）可使框内的图片按图像框大小自动调整。
A、AutoSize属性为TrueB、Stretch属性为True
C、AutoSize属性为FalseD、Stretch属性为False
20、有如下事件过程
PrivateSubCommand1_Click（）
x=1
Fori=1To3
Ifi<=1Thena=x*x
Ifi<=2Thena=x*x+1
Ifi>=3Thena=x*x+2
Printa;
Nexti
EndSub
运行时，单击命令按钮，则结果是（）：
A、2511B、151C、223D、111
21、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
PrivateSubCommand1_Click（）
StaticXAsInteger
StaticYAsInteger
Cls
Y=1:
Y=Y+5:
X=5+X
PrintX,Y
EndSub
程序运行时，单击命令按钮Command1三次后，窗体上显示的结果为（ ）
A、1516B、156C、1515D、56
22、设a=3,b=5，则以下表达式值为TRUE的是（ ）
A、a>=bAndb>10B、a>bOrb>0
C、a<0andb>0D、-3+5>aandb>0
23、从键盘上输入两个字符串，分别保存在变量str1、str2中。
确定第二个字符串在第一个字符串中起始位置的函数是（ ）
A、LeftB、MidC、StringD、Instr
24、下列哪组语句可以将变量a，b的值互换（）
A、a=b:
b=aB、a=a+b:
b=a-b:
a=a-b
C、a=c:
c=b:
b=aD、a=（a+b）/2:
b=（a-b）/2
25、可以同时删除字符串前导和尾部空格的函数是（ ）
A、Ltrim B、Rtrim C、Trim D、Mid
26、表达式29\3的值是（ ）
A、1B、7C、8D、9
27、下列程序运行后，单击command1时显示的结果是（）
PrivateSubCommand1_Click（）
x=1
mysubx+2
Printx
EndSub
PublicSubmysub（xAsInteger）
x=3*x-1
Ifx<4Thenx=x+10
Printx;
EndSub
A、81B、88C、191D、1919
28、以下有关VisualBasic语言描述中错误的是（）。
A、不区分大小写B、语句是一行一句，以回车键结束
C、用“,”分隔一行中的多个语句
D、一条语句放在多行中，则在前一行结束处使用续行符空格+下划线（“_”）连接下一行
29、在窗体上添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程：
PrivateSubCommand1_Click（）
x=0
DoWhilex<50
x=（x+2）*（x+3）
n=n+1
Loop
Text1.Text=Str（n）
Text2.Text=Str（x）
EndSub
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）
A、1和0B、2和72C、3和50D、4和168
30、设有如下声明：
DimXAsInteger
如果Sgn（X）的值为-1，则X的值是（）
A、整数B、大于0的整数C、等于0的整数D、小于0的数
二、判断题
下列各题如果是正确的，请在机读卡对应位置上涂A，如果是错误的涂B。
答在试卷
上不得分
1、VB程序运行后，在内存中只能驻留一个窗体。
2、在VB中，控件的属性只能在设计时修改，运行时无法改变。
3、执行UnloadForm1语句后，窗体Form1消失，但仍在内存中。
4、在一个窗体模块中可以调用在其他窗体中被定义为Public的通用过程。
5、Function过程与Sub过程最主要的区别是：
SUB过程不能返回值，而FUNCTION
过程能返回值。
6、用Print方法可以在图像框中输出数据。
7、Dima,b,cAsInteger能将a,b,c都声明成整型变量。
8、语句print“*”;tab（10）;”a”与语句print“*”;spc（10）;”a”的显示结果
是一样的。
9、控件数组使用Index属性来标识控件元素，其范围必须从0开始。
10、文件号的最大取值为512。
第二部分：
主观题
三、填空题
请在答题卷对应位置填写答案，答在试卷上不得分。
1、数学关系式a2+b2表示成正确的VB表达式为___【1】___。
2、计算表达式的值Int（86.567*100+0.5）/100＝___【2】___。
3、赋值语句g=123+Mid（"123456",3,2）执行后，变量g中的值是___【3】___。
4、VB6.0在编写代码时可以添加说明性文字。
注释方法有2种，一种是使用注释标记符撇号（’）；另一种是使用以关键字___【4】___开头的注释语言。
5、设a="a"，b="b"，c="c"，d="d"，执行语句x=IIf（（ad）,"A","B"）后，x的值为___【5】___。
6、在VB中，描述对象特征的数据称为对象的___【6】___。
7、有下面的表达式x1=val（“1e2abcd”），运行后，x1的值为：
___【7】___。
8、产生一个两位数的随机数的表达式为：
___【8】___。
9、只有控件对象的Enabled和Visible属性值均为___【9】___时，该控件对
升级会员 