2023年大连医科大学辽宁省计算机省二级VB试卷.doc

大连医科大学 辽宁省 计算机省二级 VB试卷
省VB试题
一、单项选用题（本题共20 小题，每题2分，共40分）
下面每题给出四个答案，用A，B，C，D标出，其中只有一种是对旳，将你选用
成果涂黑答题卡对应题号方格。
1.在Visual Basic中，窗体文献扩展名为
A. bas B. cls C. frm D. txt
2.工具栏中“启动”按钮作用是
A.打开被选中对象代码窗口 B.运行一种应用程序
C.工程管理窗口 D.运行一种窗体
3.在构造化程序设计中，限制使用goto语句原因是
A.该语句对任何构造程序都不合用 B.便于程序合成
C.提高程序执行效率 D.提高程序清晰性和可读性
4.当拖动某对象A通过对象B时，将会发生对象B
A. DragOver事件 B. DragDown事件
C. Drag事件 D. DragDrop事件
5.在使用菜单编辑器创立菜单时，可在菜单标题中某字符前插入一种符号，在运行程
序时按键和该字母键就可以打开该菜单，这个符号是
A.＠ B.＆
C.＄ D.下划线
6.在次序文献中，当使用write#语句时，文献打开方式可以是
A. Append或Input B. Output或Picture
C. Output或Append D. Output和Input
7.当运行程序时，系统执行启动窗体某个事件过程是
A. SetFocus B. Unload
C. Click D. Load
8. Right（“ABCDEFG”，3）执行成果是
A. CDE B. DEF
C. EFG D. ABC
9.要使窗体Forml标题栏显示"Visual Basic语言！”，下列语句对旳是
A. Forml.caption="Visual Basic语言！"
B. Set Forml.caption="Visual Basic语言！"
C. Forml caption="Visual Basic语言！"
D. Forml.Name="Visual Basic语言！"
10．设a=3，则执行x=IIF（a>5，-1，0）后，x值是
A. 5 B. 3
C. 0 D.-1
11.假如X是一种正实数，将千分位四舍五入，保留两位体现式是
A. 0. 01*Int (X+0.005) B. 0. 01*Int (100* (X+0.05))
C. 0. 01*Int（100* (X+0.005)） D. 0. 01*Int (X+0.05)
12.整数除法运算符是
A. Mod B.＼
C. / D.％
13.多重窗体程序设计中，为了使窗体Forml从屏幕上消失但仍在内存中，所使用方法或语句为
A. Unload Form1 B. Close Forml
C. Form 1.Hide D. Form l.Close
14. Visual Basic中，运算符“＆”代表运算是
A.算术 B.关系
C.字符串连接 D.逻辑与
15.在窗体上画一种名称为Checkl复选框，在程序运行过程中，若选中复选框，则
Checkl．Value值是
A. 3 B. 2
C. 1 D. 0
16.如下事件中，不是鼠标事件是
A. Change B. Click
C. MouseDown D. MouseUp
17.定义货币类型数据应当用关键字
A. Boolean B. Currency
C. Double D. Single
18.若使用键盘来访问菜单项“打开文献（O）”，应按组合键是
A Tab+O B. Shift+O
C. Ctrl+O D. Alt+O
19.设在菜单编辑器里定义了一种菜单项，名为menul。为了在运行时隐藏该菜单项，应使用
语句是
A.menul.Visible=False B．menul.Visible=True
C .menul.Enabled=False D. menul.Enabled=True
20.调试Visual Basic程序时，逐条语句执行快捷键是
A. F10 B. F9
C. F8 D. F7
二、多项选用题（本题共5小题，每题2分，共10分）
下面每题给出五个答案，用A，B，C，D，E标出，其中有两个（含两个）以上是对旳，将你选用成果填在答题纸对应题号括号内。
1.下面选项中，不能使控件得到焦点操作是
A.在程序运行期间，用鼠标单击对象 B.在程序运行期间，用快捷键选用对象
C在程序运行期间，用Tab键 D.在程序运行期间，用Enter键
E.在程序运行期间，用Esc键
2. Visual Basic语言中，容许出现数为
A 3.47E-10 B 886 C.2.5E
D. 34.75D+6 E. 12E3
3.下面有关多重窗体程序设计描述对旳是
A.在多重窗体程序中，只能有一种窗体是启动窗体
B.在多重窗体程序中，系统默认第一种被装载内存窗体成为启动窗体
C.在多重窗体程序中波及多种窗体，每个窗体都要作为一种文献保留
D.多重窗体程序保留操作环节按照先保留工程文献，再保留窗体文献
E.在多重窗体程序中，容许为工程生成可执行文献
4.构成构造化程序设计构造是
A次序构造 B.等价构造 C.选用构造
D.循环构造 E.转移构造
5. Visual Basic特点波及下面
A.不需编程 B.面向对象程序设计 C.可视化程序设计
D.事件驱动程序设计 E.自动化程序设计
三、填空题（本题共15小题，每题2分，共30分）
请将对旳答案填写在答题纸对应位置上，答在试卷上不能得分。
1. Visual Basic中，取出字符串中一某些持续字符构成新字符串函数是 。
2.设x=5，y=6,体现式x该工程波及两个窗体，其名称分别为Form 1和Form2，启动窗体为Form 1，在Form 1上画一种命令按钮Command 1，程序运行后，规定当单击该命令按钮时，Form 1窗体消失，显示窗体Form2，请将程序补充完整。
Private Sub Command l_Click（）
Unload Form 1
Form2．
End Sub
9.下面程序计算2*4*6*…*16，请将程序补充完整。
Private Sub Command 1_Click()
Dim t As Single，k As Integer
k＝0：t＝1

While k＜16
k＝k＋2

Wend
Print t
End Sub
10.执行下列程序段，输出成果是
a=3
b=5
c=8
Print ac
11.设计一种显示时间窗体，窗体有两个标签和一种计时器，Label1标签为“时间”，另－个标签用于显示目前机器时间。计时器Interval属性为1000请将程序补充完整。
Private Sub timer1_timer()
Labe12. =Time
End Sub

12.下面程序计算1+（1+2）＋（1+2+3）＋…＋（1+2+3+4+……＋10。），请将程序补充完整。
Private Sub Command1_Click()
Dim i As Integer，sum As Long
For i＝1To10
sum＝sum＋total(i)
Next i
Print"和数为"：sum
End Sub
Public Function total(x As Integer) As Long
Dim ss As Long，i As Integer
ss＝0
For i＝1 To x
ss＝
Next i
total＝ss
End Function
13.如下程序功能是：从键盘上输入若干个学生考试分数，当输入负数时结束，然
后输出学生最高分数和最低分数。请将程序补充完整。
Private Sub Command 1_Click()
Dim x As Single，amax As Single，amin As Single
x＝InputBox("Enter a score")
amax＝x
amen＝x
Do While
If x＞amax Then
Amax=x
End If
If amin＞x Then
amm＝x
End If
x＝InputBox("Enter a score")
Loop
Print "Max--"；amax，"Min="：amin
End Sub
14.下面程序计算1 *2+2*3+3*4+…+(N+1）*N，请将程序补充完整。
Private Sub Command 1_click()
s＝0
For k＝1 Ton
s＝s＋ *k
Next k
Print s
End Sub
15.下面程序功能是用Array函数建立一种具有8个元素数组，然后查找并输出该数组中元素最人值。请把程序补充完整。
Private Sub Command 1_Ciick()
Dim arrl，Max As Integer
arrI＝Array(12，435，76，24，78，54，866，43)
＝arr1(0)
For i＝OTo7
if arrl(i)＞Max Then Max＝arr 1(i)
Next i
Print "最大值是："：Max
End Sub
四、阅读程序题（本题共8小题，1-4每题2分，5-8每题3分，共20分）
请将对旳答案填写在答题纸对应位置上，答在试卷上不能得分。
1.在窗体上画一种命令按钮，其名称为Command l，然后编写如下程序：
Private Sub Command1_Click()
Dim a As Integer，b As Integer
A=5
b＝10
sub l a，b
Print "a="；a；"b="；b
End Sub
Sub sub I(x As Integer，y As Integer)
x＝x＋5
Y＝Y一5
End Sub
程序运行后，单击命令按钮，输出成果为 。
2.在窗体上画一种命令按钮，其名称为Command l，然后编写如下程序：
Private Sub Command 1 Clicks
Sum＝0
For k＝1 To 3
If k＜＝1 Then
X=I
ElseIf k＜＝2 Then
x＝2
Elself k＜＝3 Then
x＝3
Else
X=4
End If
Sum＝Sum＋x
Next k
Print Sum
End Sub
程序运行后，单击命令按钮，输出成果为 。
3.窗体上画一种名称为Command 1命令按钮，编写如下程序：
Private Sub Command1_Click()
a＝1:b＝2:c＝3
a＝b:b＝c:c＝a
Print a；b；c
End Sub
程序运行后，单击命令按钮，则窗体上显示 。
4.窗体上画一种名称为Command l命令按钮，编写如下程序：
Private Sub Command1_Click()
a＝0
b＝1
Do
a＝a＋b
b=a＋b
Loop While a＜20
Print a；b
End Sub
程序运行后，单击命令按钮，输出成果为 。
5.在窗体上画一种命令按钮，其名称为Command l，然后编写如下程序：
Private Sub Command1_Click()
Dim a(10，10) As Integer
For i＝2To 5
For j＝5 To 7
a(i，j)＝i＋j
Next j
Next i
Print a(2，5)＋a(3，6)＋a(4，7)
End Sub
程序运行后，单击命令按钮，输出成果为 。
6.在窗体上画一种命令按钮，其名称为Command l，然后编写如下程序：
Private Sub Command1_Click()
Dim check As Boolean，n As Integer
check＝False
n＝0
Do While n＜10
n＝n＋1
If n＝5 Then
check＝True
Exit Do
End If
Print n;
Loop
End Sub
程序运行后，单击命令按钮，输出成果为
7．在窗体上画一种命令按钮Command1和文本框Text 1，然后编写如下程序：
Private Sub Command1_Click()
Dim a(5)，b(5)
For j＝1 To 4
aU)＝3*j
b(j)=a(j)*3
Next j
Text 1.Text＝b(j\2)
End Sub
程序运行后，单击命令按钮，文本框显示为
8.在窗体上画一种名称为Command l命令按钮，然后编写如下程序：
Private Sub Command1_Click()
For k＝8 To 10
y＝ff(k)
Print y;
Next k
End Sub
Public Function ff(n)
x＝n*n
ff＝x
End Function
程序运行后输出成果是 。
调试快捷键，Visual Basic 6.0 默认快捷键选项
命令
快捷键
阐明
调试.应用代码更改
Alt + F10
在不停止调试器状况下应用对代码所做更改。
调试.自动窗口
Ctrl + Alt + V，A
显示“自动”窗口，以查看目前过程内目前执行行范围中目前变量值。
调试.所有中断
Ctrl + Break
临时停止执行调试会话中所有进程。仅可用于“运行”模式。
调试.断点
Ctrl + Alt + B
显示“断点”对话框，在此可添加和修改断点。
调试.调用堆栈
Ctrl + L
显示“调用堆栈”窗口，以显示目前执行线程所有活动过程或堆栈帧列表。仅可用于“运行”模式。
调试.清除所有断点
Ctrl + Shift + F9
清除项目中所有断点。
调试.反汇编
Ctrl + Alt + D
显示“反汇编”对话框。
调试.异常
Ctrl + Alt + E
显示“异常”对话框。
调试.即时
Ctrl + G
显示“即时”窗口，在此可计算体现式和执行单个命令。
调试.局部变量
Ctrl + Alt + V，L
显示“局部变量”窗口，以查看目前堆栈帧中每个过程变量及变量值。
调试.内存1
Ctrl + Alt + M，1
显示“内存 1”窗口，该窗口容许查看大缓冲区、字符串以及其她不能在“监视”或“变量”窗口中很好显示数据。
调试.内存2
Ctrl + Alt + M，2
显示“内存 2”窗口，该窗口容许查看大缓冲区、字符串以及其她不能在“监视”或“变量”窗口中很好显示数据。
调试.内存3
Ctrl + Alt + M，3
显示“内存 3”窗口，该窗口容许查看大缓冲区、字符串以及其她不能在“监视”或“变量”窗口中很好显示数据。
调试.内存4
Ctrl + Alt + M，4
显示“内存 4”窗口，该窗口容许查看大缓冲区、字符串以及其她不能在“监视”或“变量”窗口中很好显示数据。
调试.模块
Ctrl + Alt + U
显示“模块”窗口，该窗口容许查看由程序使用 .dll 或 .exe 文献。
调试.新断点
Ctrl + B
在目前代码行中插入或清除断点。
Debug.QuickWatch
Shift + F9
显示包括选定体现式目前值“迅速监视”对话框。仅合用于“中断”模式。使用该命令可检查尚未为其定义监视体现式变量、属性或其她体现式目前值。
调试.寄存器
Ctrl + Alt + G
显示“寄存器”窗口，该窗口显示有关调试本机代码应用程序内容。
调试.重新启动
Shift + F5
终止调试会话，重新生成，然后从开始处开始运行应用程序。可用于“中断”模式和“运行”模式。
调试.运行文档
Ctrl + Alt + N
显示“运行文档”窗口，该窗口显示正处在调试过程中文档集。可用于“运行”模式。
调试.运行到光标处
Ctrl + F8
在“中断”模式下，从目前语句继续执行代码，直到选定语句。“目前执行行”边距指示符出目前“边距指示符”栏中。在“设计”模式下，启动调试器并执行代码（执行到光标所在位置）。
调试.设置下一语句
Ctrl + F9
在选用代码行上设置执行点。
调试.显示下一语句
Alt + 数字键区中 *
突出显示要执行下一条语句。
调试.启动
F5
自动附加调试器，并从“ect> 属性”对话框中指定启动窗体运行应用程序。假如为“中断”模式，则更改为“继续”。
调试.开始执行不调试
Ctrl + F5
在不调用调试器状况下运行代码。
调试.逐语句
F8
在执行进入函数调用后，逐条语句执行代码。
调试.跳出
Ctrl + Shift + F8
执行目前执行点所处函数剩余行。
调试.逐过程
Shift + F8
执行下一行代码，但不执行任何函数调用。
调试.This
Ctrl + Alt + V，T
显示“This”窗口，该窗口容许查看与目前措施关联对象数据组员。
调试.线程
Ctrl + Alt + H
显示“线程”窗口以查看当前进程所有线程以及它们有关信息。
Debug.ToggleBreakpoint
F9
在目前行设置或移除断点。
调试.切换反汇编
Ctrl + F11
显示目前源文献反汇编信息。仅合用于“中断”模式。
工具.调试进程
Ctrl + Alt + P
显示“进程”对话框，该对话框容许在单个处理方案中同步调试多种程序。