1、二级 VISUAL+BASIC 笔试-135 及答案解析(总分：90.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.要获得当前驱动器应使用驱动器列表框的属性是（分数：2.00）A.PathB.DriveC.DirD.Pattern2.下列方法中不能退出 Visual Basic 的是（分数：2.00）A.按 Alt+Q 组合键B.按下 Alt+F 组合键，然后按 Esc 键C.打开“文件”菜单，执行“退出”命令D.按 F10 键，然后按 F 键，再按 X 键3.数据库系统的核心是（分数：2.00）A.数据库B.数据库管理系统C.模拟模型D.软件工程4.开发软件时对
2、提高开发人员工作效率至关重要的是（分数：2.00）A.操作系统的资源管理功能B.先进的软件开发工具和环境C.程序人员的数量D.计算机的并行处理能力5.下列程序的功能是调用字体对话框来设置文本框字体，单击按钮弹出对话框后，按 Cancel键退出对话框，则Private Sub Command1_Click( )CommonDialoglCancelError=TrueCommonDialoglFlags=cdlCFEffects Or cdlDFBotbCommonDialoglAction=4CommonDialoglShowFontText1.Font.Name=CommonDialoglF
3、ontNameText1FontSize=CommonDialoglFontSizeText1FontBold=CommonDialog1FontBoldText1FontItalic=CommonDialog1FontItalicText1FontUnderline=CommonDialog1FontUnderlineText1FontStrikethru=CommonDialog1FontStrikethruText1ForeColor=CommonDialog1ColorEnd Sub（分数：2.00）A.Text1 的字体不发生变化B.Text1 的字体发生变化C.Text1 的字体和
4、颜色发生变化D.程序出错!6.下列程序段的执行结果为a=3b=1For I=1 To 3f=a + ba=bb=fPrint fNext I（分数：2.00）A.4 3 6B.4 5 9C.6 3 4D.7 2 87.以下程序段的输出结果为Dim 1，a(10)，p(3)k=5Fori=0 To 10a(i)=iNext iFor i=0 To 2p(i)=a(i*(i+1)Next iFor i=0 To 2k=k+p(i)*2Next iFrint k（分数：2.00）A.20B.21C.56D.328.在 Visual Basic 中，要强制用户对所用的变量进行显式声明，这可以在哪里设置
5、?（分数：2.00）A.“属性”对话框B.“程序代码”窗口C.“选项”对话框D.对象浏览器9.设已经在“菜单编辑器”中设计了窗体的快捷菜单，其顶级菜单为 Bs，取消其“可见”属性，运行时，在以下事件过程中，可以使快捷菜单响应鼠标右键菜单的是（分数：2.00）A.Private Sub Form_Mouse Down(Button As Integer，Shift As Integer，-X As Single，Y As Single)If Button=2 Then PopupMenu Bs，2End SubB.Private Sub Form_MouseDown(Button As Inte
6、ger，Shift As Integer，-X As Single，Y As Single)PopupMenu BsEnd SubC.Private Sub FOrm_MouseDown(Button As Integer，Shift As Integer，-X As Single，Y As Single)PopupMenu Bs，0End SubD.Private Sub Form_MouseDown(Button As Integer，Shin As Integer，-X As Single，Y As Single)If(Button=vbLeftButton)Or(Button=vbRi
7、ghtButton)Then PopupMenu BsEnd Sub10.如果将文本框的 MaxLength 属性设置为 0，则文本框中的字符不能超过（分数：2.00）A.8KB.16KC.32KD.64K11.若某二叉树的前序遍历访问顺序是 abdgcefh，中序遍历访问顺序是 dgbaechf，则其后序遍历的结点访问顺序是（分数：2.00）A.bdgcefhaB.gdbecfhaC.bdgaechfD.gdbehfca12.软件工程的理论和技术性研究的内容主要包括软件开发技术和（分数：2.00）A.消除软件危机B.软件工程管理C.程序设计自动化D.实现软件可重用13.要将名为 MyForm
8、 的窗体显示出来，正确的使用方法是（分数：2.00）A.MyFormShowB.ShowMyFormC.MyForm LoadD.MyForm Show14.下面程序段，运行后的结果是Private Sub Commandl_Click( )Dim b%(1 To 4)，i%，t#For i=1 To 4b(i)=iNext it=Tof(b( ) )Print“t=“；t，End SubFunction Tof(a() As Integer)Dim t#，i%t=1For i=2 To UBound(（分数：2.00）A.t=t * a(i)0f2down%=(KeyCode=Key_F2)
9、If altdown% And f2down% ThenText1Text=“BBBBB“End IfEnd Sub上述程序运行后，如果按【Shift+F2】，则在文本框中显示得是（分数：2.00）A.Alt+F2B.BBBBBC.随机出几个数D.文本框平均内容无变化32.下列程序段的执行结果为I=9X=5DoI=I+1x=x+2Loop Until I =7Print“I=“；IPrint“x=“；x（分数：2.00）A.I=4x=5B.I=7x=15C.I=6x=8D.I=10x=733.可以实现从键盘输入一个作为双精度变量 a 的值的语句是（分数：2.00）A.a=InputBox( )
10、B.a=InputBox(“请输入一个值”)C.a=Val(InputBox(“请输入一个值”)D.a=Val(InputBox( ) )34.设有声明语句Dim b(-1 To 10，2 To 9，20)As Integer则数组 b 中全部元素的个数（分数：2.00）A.2310B.2016C.1500D.165835.在窗体上画一个命令按钮，然后编写下列程序Private Sub Command3_Click( )Tcl 2Tcl 3Tel 4End SubSub Tcl(a As Integer)Static x As Integerx=x + aPrint x；End Sub程序运行
11、后，单击命令按钮，输出结果为（分数：2.00）A.2 3 4B.2 5 9C.3 5 4D.2 4 3二、填空题(总题数：10，分数：20.00)36.在树结构中，树根结点没有 【1】 。（分数：2.00）填空项 1:_37.Jackson 结构化程序设计方法是英国的 MJackson 提出的，它是一种面向 【2】 的设计方法。（分数：2.00）填空项 1:_38.面向对象的模型中，最基本的概念是对象和 【3】 。（分数：2.00）填空项 1:_39.软件设计模块化的目的是 【4】 。（分数：2.00）填空项 1:_40.数据模型按不同应用层次分成 3 种类型，它们是概念数据模型、 【5】 和
12、物理数据模型。（分数：2.00）填空项 1:_41.在 Visual Basic 的立即窗口内输入以下语句X=65 ? Chr$(X) 在窗口中显示的结果是 【6】 。（分数：2.00）填空项 1:_42.下列程序是判断一个整数(=3)是否为素数，请补充完整。Dim n As Integern=InputBox(“请输入一个整数(=3)“)k=Int(Sqr(n)i=2swit=0While i0f2down%=(KeyCode=Key_F2)If altdown% And f2down% ThenText1Text=“BBBBB“End IfEnd Sub上述程序运行后，如果按【Shift+
13、F2】，则在文本框中显示得是（分数：2.00）A.Alt+F2B.BBBBBC.随机出几个数D.文本框平均内容无变化 解析：解析：此题是有关 KeyDown 事件的题目，KeyDown 是当一个键被按下时所产生的事件，而 KeyUp 是松开被按的键时产生的事件，如果要判断是否按下了某个转换键，可以用逻辑运算符 And。例如：先定义了下面 3 个符号常量：Const Shift=1，ConstCtrl=2，Const Alt=4；然后用下面的语句判断是否按下 Shift、Ctrl、Alt 键；如果 Shift And Shift 0，则按下了 Shift 键；如果 Shift And Ctrl
14、0，则按下了 Ctrl 键；如果 Shift And Alt 0，则按下了 Alt 键；这里的 Shift 时 KeyDown 的第二个参数；此事件过程中的 If 后的条件语句如果为真，则是按下了 Alt+F2，而本题目中是按下了 Shift+F2，所以不执行 Then 语句，即文本框的内容无变化。32.下列程序段的执行结果为I=9X=5DoI=I+1x=x+2Loop Until I =7Print“I=“；IPrint“x=“；x（分数：2.00）A.I=4x=5B.I=7x=15C.I=6x=8D.I=10x=7 解析：解析：此题用的是 Do 循环结构，其格式为：Do语句块Exit Do
15、Loop Until 循环条件此循环由于“先执行后检查”，所以至少执行一次。本题中，程序运行到循环条件 I=7 的值为True，才停止。所以当程序结束运行后 I=10，x=7。33.可以实现从键盘输入一个作为双精度变量 a 的值的语句是（分数：2.00）A.a=InputBox( )B.a=InputBox(“请输入一个值”)C.a=Val(InputBox(“请输入一个值”)D.a=Val(InputBox( ) )解析：解析：InputBox 函数的格式为：InputBox(prompt,default，xpos，ypos，helpfile，context)其中 prompt 是一个字符串
16、，用于提示用户输入，是在对话框中显示的信息，不可省略，故选项 A)和选项D)不正确；Val(字符串)函数的功能是把自变量中的第一个字符串转换为数值，其中的数值是一个双精度的实数，所以正确答案为选项 C)；选项 B)没有类型转换符，不正确。34.设有声明语句Dim b(-1 To 10，2 To 9，20)As Integer则数组 b 中全部元素的个数（分数：2.00）A.2310B.2016 C.1500D.1658解析：解析：在本题中，Dim b(-1 To 10，2 To 9，20)As Integer 定义了一个三维数组，如果没有指定下界，缺省值是 0，所以计算数组中的个数就容易了，表
17、达式为：(10-(-1)+1)(9-2+1)(20-0+1)=2016，所以选项 B)是正确答案。35.在窗体上画一个命令按钮，然后编写下列程序Private Sub Command3_Click( )Tcl 2Tcl 3Tel 4End SubSub Tcl(a As Integer)Static x As Integerx=x + aPrint x；End Sub程序运行后，单击命令按钮，输出结果为（分数：2.00）A.2 3 4B.2 5 9 C.3 5 4D.2 4 3解析：解析：在过程 TCL 中，将 Integer 型变量 x 定义为静态变量(Static)，Static 语句的格
18、式与 Dim语句完全一样，但 Static 语句只能出现在事件过程，Sub 过程或 Func- tion 过程中，在过程中的 Static变量只有局部的作用域，即只能在本过程中可见，但可以和模块级变量传递，即使过程结束后，其值仍能保留。Tcl 过程是将变量 a 的值加上 x 赋给 x，然后输出 x 的值；第一次调用 Tcl 过程时，x 未赋值，默认为 0，所以输出结果为 2，第二次调用 Tcl 过程时，因为 x 为静态变量，所以它的值为上次调用后的值，即为 2，加上 a 后，x 的值变为 5，输出结果为 5，同理，第三次调用后输出结果为 9。二、填空题(总题数：10，分数：20.00)36.在
19、树结构中，树根结点没有 【1】 。（分数：2.00）填空项 1:_ （正确答案：【1】前件）解析：解析：在树结构中，每一个结点只有一个前件，称为父结点，没有前件的结点只有一个，称为树的根结点；每一个结点可以有多个后件，它们都称为该结点的子结点。没有后件的结点称为叶子结点。37.Jackson 结构化程序设计方法是英国的 MJackson 提出的，它是一种面向 【2】 的设计方法。（分数：2.00）填空项 1:_ （正确答案：【2】数据结构 ）解析：解析：结构化分析方法主要包括：面向数据流的结构化分析方法(SA-Structured anal- ysis)，面向数据结构的 Jackson 方法(
20、JSD-Jackson system development method)和面向数据结构的结构化数据系统开发方法(DSSD-Data structured system development method)。38.面向对象的模型中，最基本的概念是对象和 【3】 。（分数：2.00）填空项 1:_ （正确答案：【3】类）解析：解析：面向对象模型中，最基本的概念是对象和类。对象是现实世界中实体的模型化；将属性集和方法集相同的所有对象组合在一起，可以构成一个类。39.软件设计模块化的目的是 【4】 。（分数：2.00）填空项 1:_ （正确答案：【4】降低复杂性）解析：解析：模块化是指解决一个复
21、杂问题时自顶向下逐层把软件系统划分成若干模块的过程，由此分解来降低复杂性。40.数据模型按不同应用层次分成 3 种类型，它们是概念数据模型、 【5】 和物理数据模型。（分数：2.00）填空项 1:_ （正确答案：【5】逻辑数据模型）解析：41.在 Visual Basic 的立即窗口内输入以下语句X=65 ? Chr$(X) 在窗口中显示的结果是 【6】 。（分数：2.00）填空项 1:_ （正确答案：【6】A）解析：解析：Chr$()是求 ASCII 字符的函数，格式是 Chr$(表达式)，其中“表达式”应该是合法的 ASCII码值，Chr$()函数把“表达式”的值转换为相应的 ASCII
22、字符。本题中 X= 65 对应的 ASCII 码是字符 A，所以显示的结果应该是 A。42.下列程序是判断一个整数(=3)是否为素数，请补充完整。Dim n As Integern=InputBox(“请输入一个整数(=3)“)k=Int(Sqr(n)i=2swit=0While i=k And swit=0If n Mod i=0 Then【7】 Else【8】 End IfWendIf swit=0 ThenPrint n；“是一个素数。“ElsePrint n；“不是一个素数。“End If（分数：2.00）填空项 1:_ （正确答案：【7】swit=1【8】I=I+1）解析：解析：素数
23、是只能被 1 和本身整除的正整数，在本题的程序中，swit 是一个标志变量，如果“swit=0”，则表示 n 不能被整除；如果能被一个整数整除，则 swit 变为 1；While 循环执行的条件有两个，一个是“I = k”，另一个是“swit=0”，必须两个条件同时成立才执行循环，当 Ik 时，显然不必再检查 n 是否能被 I 整除；而如果“swit=1 ”，则表示 n 已被整除，肯定不是素数，也不必检查了。只有“I=k”和“swit=0”两者同时成立时才需要检查“n 是否为素数”，循环只有一个判断操作，即判断 n 能否被 I 整除，如果不能，则 I=I+1。以便为下一次判断作准备。43.下面
24、程序是用来打印九九乘法表的，请补充完整。Dim i As Integer，j As Integer，Strl$Strl=“ “For i=1 To 9Forj=1 To 9If 【9】 ThenStrl=Strl + Str$(j)+“X“+Str$(i)+“=“+Str$(Val(i * j)ElseStrl=Strl & Chr(13)【10】 End IfNext jNext iPrint Str（分数：2.00）填空项 1:_ （正确答案：【9】j=i【10】Exit For）解析：解析：(1)Exit 语句总是出现在 If 语句或 Select Case 语句内部，而 If 语句或
25、Select Case 语句在循环内嵌套，用 Exit 语句中断循环。函数首先定义了两个 Integer 型变量 i、 j,并将空格赋给 Strl；第一个 For 循环的变量 I 从 1 到 9 步长为 1，第二个循环的变量 i 也是从 1 到 9 步长为 l，循环体为选择结构，它是用来输出 i*j 的值，所以 j 的值应该小于此时 i 的值，那么 If 的判断语句为 j=i，当满足条件时执行 Then 后面的语句，即输出 i*j 的值，如果不满足执行 Else 后面的语句，并跳出内循环。44.在窗体上有一个命令按钮，然后编写如下程序：Function Trans(ByVal num As L
26、ong) As LongDim k As Longk=lDo While numk=k * (num Mod 10)num=num/10LoopTrans=kPrint TransEnd FunctionPrivate Sub Commandl_Click1Dim m As LongDim s As Longm=InputBox(“请输入一个数“)s=Trans(m)End Sub程序运行时，单击命令按钮，在输入对话框中输入“789”，输出结果为 【11】 ，在输入对话框中输入“987”输出 【12】 ，在输入对话框中输入“879”，输出结果为 【13】 。（分数：2.00）填空项 1:_ （
27、正确答案：【11】 504【12】504【13】504）解析：解析：关键字 ByVal 用来实现传值，也就是说在定义通用过程时，如果形参前面有关键字 Byval，则该参数用传值方式传递，否则用传址方式传递；在 Sub 过程中，先将输入的“456”赋给变量 m，m 作为参数，调用 Trans 过程；在 Trans 过程中以 num 作为 Do While 的循环条件；在循环体中，调用 Mod 函数，将 num 的个位数字与 k 相乘，然后赋给 k，第一次循环时，num 的值是 789，所以 k 的值为 9，执行 num = num/10 后，num 的值为 78，循环三次后，num 变为 0；退出循环，k 值等于 987=504，并将 k 的值作为返回值；当输入“987”或“879”时执行相同的操作，结果都为 504。可以看出，此程序可用于求一个数值各位上数值的乘积。45.下面程序的功能是产生 10 个小于 100(不含 100)的随机正整数，并统计其中 5 的倍数所占比例，但程序不完整，请补充完整。
