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

大连医科大学 辽宁省 计算机省二级 VB试卷省VB试题一、单项选用题（本题共20 小题，每题2分，共40分） 下面每题给出四个答案，用A，B，C，D标出，其中只有一种是对旳，将你选用 成果涂黑答题卡对应题号方格。1.在Visual Basic中，窗体文献扩展名为 A. bas B. cls C. frm D. txt2.工具栏中“启动”按钮作用是 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和Input7.当运行程序时，系统执行启动窗体某个事件过程是 A. SetFocus B. Unload C. Click D. Load8. Right（“ABCDEFG”，3）执行成果是 A. CDE B. DEF C. EFG D. ABC9.要使窗体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（a5，-1，0）后，x值是 A. 5 B. 3 C. 0 D.-111.假如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.Close14. Visual Basic中，运算符“”代表运算是 A.算术 B.关系 C.字符串连接 D.逻辑与15.在窗体上画一种名称为Checkl复选框，在程序运行过程中，若选中复选框，则 ChecklValue值是 A. 3 B. 2 C. 1 D. 016.如下事件中，不是鼠标事件是 A. Change B. Click C. MouseDown D. MouseUp17.定义货币类型数据应当用关键字 A. Boolean B. Currency C. Double D. Single18.若使用键盘来访问菜单项“打开文献（O）”，应按组合键是 A Tab+O B. Shift+O C. Ctrl+O D. Alt+O19.设在菜单编辑器里定义了一种菜单项，名为menul。为了在运行时隐藏该菜单项，应使用 语句是 A.menul.Visible=False Bmenul.Visible=True C .menul.Enabled=False D. menul.Enabled=True20.调试Visual Basic程序时，逐条语句执行快捷键是 A. F10 B. F9C. 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,体现式xy值为 。3.根据数据存取方式和构造，文献可以分为次序文献和 。4. Visual Basic中，将字符串转换成ASCII代码函数是 。5.语句Print25*40输出成果是 。6. Data控件是Visual Basic中用于访问数据库原则控件. Data控件提供了 措施用于关闭一种数据库。7.在Visual Basic中，工程文献扩展名是 。8.假定建立了一种工程，该工程波及两个窗体，其名称分别为Form 1和Form2，启动窗体为Form 1，在Form 1上画一种命令按钮Command 1，程序运行后，规定当单击该命令按钮时，Form 1窗体消失，显示窗体Form2，请将程序补充完整。 Private Sub Command l_Click（） Unload Form 1 Form2 End Sub9.下面程序计算2*4*6*16，请将程序补充完整。 Private Sub Command 1_Click() Dim t As Single，k As Integer k0：t1 While k16 kk2 Wend Print t End Sub10.执行下列程序段，输出成果是 a=3 b=5 c=8 Print ac11.设计一种显示时间窗体，窗体有两个标签和一种计时器，Label1标签为“时间”，另个标签用于显示目前机器时间。计时器Interval属性为1000请将程序补充完整。Private Sub timer1_timer() Labe12. =TimeEnd Sub12.下面程序计算1+（1+2）（1+2+3）（1+2+3+4+10。），请将程序补充完整。 Private Sub Command1_Click() Dim i As Integer，sum As Long For i1To10 sumsumtotal(i) Next i Print和数为：sum End Sub Public Function total(x As Integer) As Long Dim ss As Long，i As Integer ss0 For i1 To x ss Next i totalss End Function13.如下程序功能是：从键盘上输入若干个学生考试分数，当输入负数时结束，然 后输出学生最高分数和最低分数。请将程序补充完整。 Private Sub Command 1_Click() Dim x As Single，amax As Single，amin As Single xInputBox(Enter a score) amaxx amenx Do While If xamax Then Amax=x End If If aminx Then ammx End If xInputBox(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() s0 For k1 Ton ss *k Next k Print s End Sub15.下面程序功能是用Array函数建立一种具有8个元素数组，然后查找并输出该数组中元素最人值。请把程序补充完整。 Private Sub Command 1_Ciick() Dim arrl，Max As Integer arrIArray(12，435，76，24，78，54，866，43) arr1(0) For iOTo7 if arrl(i)Max Then Maxarr 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 b10 sub l a，b Print a=；a；b=；b End Sub Sub sub I(x As Integer，y As Integer) xx5 YY一5 End Sub 程序运行后，单击命令按钮，输出成果为 。2.在窗体上画一种命令按钮，其名称为Command l，然后编写如下程序： Private Sub Command 1 Clicks Sum0 For k1 To 3 If k1 Then X=I ElseIf k2 Then x2 Elself k3 Then x3 Else X=4 End If SumSumx Next k Print Sum End Sub 程序运行后，单击命令按钮，输出成果为 。3.窗体上画一种名称为Command 1命令按钮，编写如下程序： Private Sub Command1_Click() a1:b2:c3 ab:bc:ca Print a；b；c End Sub 程序运行后，单击命令按钮，则窗体上显示 。4.窗体上画一种名称为Command l命令按钮，编写如下程序： Private Sub Command1_Click() a0 b1 Do aab b=ab Loop While a20 Print a；b End Sub 程序运行后，单击命令按钮，输出成果为 。5.在窗体上画一种命令按钮，其名称为Command l，然后编写如下程序： Private Sub Command1_Click() Dim a(10，10) As Integer For i2To 5 For j5 To 7 a(i，j)ij 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 checkFalse n0 Do While n10 nn1 If n5 Then checkTrue Exit Do End If Print n; Loop End Sub 程序运行后，单击命令按钮，输出成果为7在窗体上画一种命令按钮Command1和文本框Text 1，然后编写如下程序：Private Sub Command1_Click() Dim a(5)，b(5) For j1 To 4 aU)3*j b(j)=a(j)*3 Next j Text 1.Textb(j2) End Sub 程序运行后，单击命令按钮，文本框显示为8.在窗体上画一种名称为Command l命令按钮，然后编写如下程序： Private Sub Command1_Click() For k8 To 10 yff(k) Print y; Next k End Sub Public Function ff(n) xn*n ffx 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显示“局部变量”窗口，以查看目前堆栈帧中每个过程变量及变量值。调试.内存1Ctrl + Alt + M，1显示“内存 1”窗口，该窗口容许查看大缓冲区、字符串以及其她不能在“监视”或“变量”窗口中很好显示数据。调试.内存2Ctrl + Alt + M，2显示“内存 2”窗口，该窗口容许查看大缓冲区、字符串以及其她不能在“监视”或“变量”窗口中很好显示数据。调试.内存3Ctrl + Alt + M，3显示“内存 3”窗口，该窗口容许查看大缓冲区、字符串以及其她不能在“监视”或“变量”窗口中很好显示数据。调试.内存4Ctrl + Alt + M，4显示“内存 4”窗口，该窗口容许查看大缓冲区、字符串以及其她不能在“监视”或“变量”窗口中很好显示数据。调试.模块Ctrl + Alt + U显示“模块”窗口，该窗口容许查看由程序使用 .dll 或 .exe 文献。调试.新断点Ctrl + B在目前代码行中插入或清除断点。Debug.QuickWatchShift + F9显示包括选定体现式目前值“迅速监视”对话框。仅合用于“中断”模式。使用该命令可检查尚未为其定义监视体现式变量、属性或其她体现式目前值。 调试.寄存器Ctrl + Alt + G显示“寄存器”窗口，该窗口显示有关调试本机代码应用程序内容。调试.重新启动Shift + F5终止调试会话，重新生成，然后从开始处开始运行应用程序。可用于“中断”模式和“运行”模式。调试.运行文档Ctrl + Alt + N显示“运行文档”窗口，该窗口显示正处在调试过程中文档集。可用于“运行”模式。调试.运行到光标处Ctrl + F8在“中断”模式下，从目前语句继续执行代码，直到选定语句。“目前执行行”边距指示符出目前“边距指示符”栏中。在“设计”模式下，启动调试器并执行代码（执行到光标所在位置）。调试.设置下一语句Ctrl + F9在选用代码行上设置执行点。调试.显示下一语句Alt + 数字键区中 *突出显示要执行下一条语句。调试.启动F5自动附加调试器，并从“ 属性”对话框中指定启动窗体运行应用程序。假如为“中断”模式，则更改为“继续”。调试.开始执行不调试Ctrl + F5在不调用调试器状况下运行代码。调试.逐语句F8在执行进入函数调用后，逐条语句执行代码。调试.跳出Ctrl + Shift + F8执行目前执行点所处函数剩余行。调试.逐过程Shift + F8执行下一行代码，但不执行任何函数调用。调试.ThisCtrl + Alt + V，T显示“This”窗口，该窗口容许查看与目前措施关联对象数据组员。调试.线程Ctrl + Alt + H显示“线程”窗口以查看当前进程所有线程以及它们有关信息。Debug.ToggleBreakpointF9在目前行设置或移除断点。调试.切换反汇编Ctrl + F11显示目前源文献反汇编信息。仅合用于“中断”模式。 工具.调试进程Ctrl + Alt + P显示“进程”对话框，该对话框容许在单个处理方案中同步调试多种程序。