1、国家二级（VB）机试模拟试卷 177 及答案解析(总分：86.00，做题时间：90 分钟)一、选择题(总题数：40，分数：80.00)1.下列叙述中正确的是( )。（分数：2.00）A.算法就是程序B.设计算法时只需要考虑数据结构的设计C.设计算法时只需要考虑结果的可靠性D.以上三种说法都不对2.下列叙述中正确的是( )。（分数：2.00）A.有一个以上根结点的数据结构不一定是非线性结构B.只有一个根结点的数据结构不一定是线性结构C.循环链表是非线性结构D.双向链表是非线性结构3.下列关于二叉树的叙述中，正确的是( )。（分数：2.00）A.叶子结点总是比度为 2 的结点少一个B.叶子结点总是
2、比度为 2 的结点多一个C.叶子结点数是度为 2 的结点数的两倍D.度为 2 的结点数是度为 1 的结点数的两倍4.软件生命周期中的活动不包括( )。（分数：2.00）A.市场调研B.需求分析C.软件测试D.软件维护5.某系统总体结构图如下图所示： （分数：2.00）A.7B.6C.3D.26.程序调试的任务是( )。（分数：2.00）A.设计测试用例B.验证程序的正确性C.发现程序中的错误D.诊断和改正程序中的错误7.下列关于数据库设计的叙述中，正确的是( )。（分数：2.00）A.在需求分析阶段建立数据字典B.在概念设计阶段建立数据字典C.在逻辑设计阶段建立数据字典D.在物理设计阶段建立数
3、据字典8.数据库系统的三级模式不包括( )。（分数：2.00）A.概念模式B.内模式C.外模式D.数据模式9.有三个关系 R、S 和 T 如下： （分数：2.00）A.自然连接B.交C.投影D.并10.下列选项中属于面向对象设计方法主要特征的是( )。（分数：2.00）A.继承B.自顶向下C.模块化D.逐步求精11.以下合法的 VB 变量名是( )。（分数：2.00）A.#_1B.123_aC.stringD.x_12312.以下关于 VB 的叙述中，错误的是( )。（分数：2.00）A.VB 采用事件驱动方式运行B.VB 既能以解释方式运行，也能以编译方式运行C.VB 程序代码中，过程的书写
4、顺序与执行顺序无关D.VB 中一个对象对应一个事件13.有如下数据定义语句： Dim X，Y As Integer 以上语句表明( )。（分数：2.00）A.X、Y 均是整型变量B.X 是整型变量，Y 是变体类型变量C.X 是变体类型变量，Y 是整型变量D.X 是整型变量，Y 是字符型变量14.以下关于控件数组的叙述中，正确的是( )。（分数：2.00）A.数组中各个控件具有相同的名称B.数组中可包含不同类型的控件C.数组中各个控件具有相同的 Index 属性值D.数组元素不同，可以响应的事件也不同15.以下关于 VB 文件的叙述中，错误的是( )。（分数：2.00）A.标准模块文件不属于任何
5、一个窗体B.工程文件的扩展名为frmC.一个工程只有一个工程文件D.一个工程可以有多个窗体文件16.设 x 为一整型变量，且情况语句的开始为：Select Case x，则不符合语法规则的 Case 子句是( )。（分数：2.00）A.Case Is20B.Case 1 To 10C.Case 050，Int(a3)，a Mod 2) 当 a=52 时，x 的值是( )。（分数：2.00）A.0B.1C.17D.1818.设有如下数组定义语句： Dim a(一 1 To 4，3)As Integer 以下叙述中正确的是( )。（分数：2.00）A.a 数组有 18 个数组元素B.a 数组有 2
6、0 个数组元素C.a 数组有 24 个数组元素D.语法有错19.以下叙述中错误的是( )。（分数：2.00）A.Sub Main 是定义在标准模块中的特定过程B.一个工程中只能有一个 Sub Main 过程C.Sub Main 过程不能有返回值D.当工程中含有 Sub Main 过程时，工程执行时一定最先执行该过程20.关于随机文件，以下叙述中错误的是( )。（分数：2.00）A.使用随机文件能节约空间B.随机文件记录中，每个字段的长度是固定的C.随机文件中，每个记录的长度相等D.随机文件的每个记录都有一个记录号21.在名称为 Framel 的框架中，有两个名称分别为 0p1、op2 的单选按
7、钮，标题分别为“单程”、“往返”，如图所示。 （分数：2.00）A.若仅把 Framel 的 Enabled 属性设为 False，则 op1、op2 仍可用B.对于上图，op1Value 的值为 TrueC.对于上图，执行 Op1Value=False 命令，则“往返”单选按钮被选中D.对于上图，执行 Op1Value=0 命令，程序出错22.以下能够设置控件焦点的方法是( )。（分数：2.00）A.SetFocusB.GotFocusC.LostFocusD.TabStop23.使用 Line 控件在窗体上画一条从(0，0)到(600，700)的直线，则其相应属性的值应是( )。（分数：2
8、.00）A.X1=0，X2=600，Y1=0，Y2=700B.Y1=0，Y2=600，Xl=0，X2=700C.X1=0，X2=0，Y1=600，Y2=700D.Y1=0，Y2=0，X1=600，X2=70024.设有窗体的 Form_MouselVlove 事件过程如下： Private Sub Form_MouseMove(Button As Integer，Shift As Integer，X As Single，Y A8 Single) If(Button And 3)=3 Then Print“检查按键“ End If End Sub 关于上述过程，以下叙述中正确的是( )。（分数：
9、2.00）A.按下鼠标左键时，在窗体上显示“检查按键”B.按下鼠标右键时，在窗体上显示“检查按键”C.同时按下鼠标左、右键时，在窗体上显示“检查按键”D.不论做何种操作，窗体上都不会显示25.窗体上有一个名称为 CD1 的通用对话框，一个名称为 Command1 的命令按钮，相应的事件过程如下： Private Sub Command1_Click() CD1Filter=“All File |*|Text File|*txt|PPT|*ppt“ CD1FilterIndex=2 CD1InitDir=“C：“ CD1FileNarne=“default“ CD1ShowSave End Su
10、b 关于上述过程，以下叙述中正确的是( )。（分数：2.00）A.默认过滤器为“*ppt”B.指定的初始目录为“C：”C.打开的文件对话框的标题为“default”D.上面事件过程实现保存文件的操作26.以下关于窗体的叙述中，错误的是( )。（分数：2.00）A.Hide 方法能隐藏窗体，但窗体仍在内存中B.使用 Show 方法显示窗体时，一定触发 Load 事件C.移动或放大窗体时，会触发 Paint 事件D.双击窗体时，会触发 DblClick 事件27.下列控件中，没有 Caption 属性的是( )。（分数：2.00）A.单选按钮B.复选框C.列表框D.框架28.将数据项“Studen
11、t”添加到名称为 List1 的列表框中，并使其成为列表框第一项的语句为( )。（分数：2.00）A.List1AddItem“Student“，0B.List1AddItem“Student“1C.List1AddItem 0，“Student“D.List1AddItem 1，“Student“29.下列针对框架控件的叙述中，错误的是( )。（分数：2.00）A.框架是一个容器控件B.框架也有 Click 和 DblClick 事件C.框架也可以接受用户的输入D.使用框架的主要目的是为了对控件进行分组30.窗体上有一个名为 Command1 的命令按钮，并有下面的程序： Private S
12、ub Command1_Click() Dim arr(5)As Integer For k=1 To 5 arr(k)=k Next k prog arr() For k=1 To 5 Print arr(k)； Next k End Sub Sub prog(a()As Integer) n=UBound(a) For i=n To 2 step1 For j=1 To n1 if a(j)A.1 2 3 4 5B.5 4 3 2 1C.0 1 2 3 4D.4 3 2 1 031.下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是( )。 Pr
13、ivlite Sub Command1_Click() Dim count(25)As integer，ch As String eh=UCase(InputBox(“请输入字母字符串“) For k=1 To Len(ch) n=Asc(Mid(eh，k，1)一 Asc(“A“) If n=0 Then count(n)=count(n)+1 End If Next k m=eount(0) For k=1 To 25 If mA.0B.1C.2D.332.在窗体上画一个命令按钮和一个文本框，其名称分别为 Command1 和 Text1，把文本框的 Text 属性设置为空白，然后编写如下事
14、件过程： Private Sub Command1_Click() a=InputBox(“Enter an integer“) b=Text1Text Text1Text=b+a End Sub 程序运行后，在文本框中输入 456，然后单击命令按钮，在输入对话框中输入 123，则文本框中显示的内容是( )。（分数：2.00）A.579B.123C.456123D.45633.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程： Prirate Sub Command1_Click() Dim i As Integer，n As Inte
15、ger For i=0 To 50 i=i+3 n=n+1 If i10 Then Exit For Next Text1Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是( )。（分数：2.00）A.2B.3C.4D.534.设有如下的程序段： n=0 For i=1 Tb 3 For j=1 To i For k=j To 3 n=n+1 Next k Next i Next i 执行上面的程序段后，n 的值为( )。（分数：2.00）A.3B.21C.9D.1435.在窗体上画一个名称为 Command1 的命令按钮，一个名称为 Label1 的标签，
16、然后编写如下事件过程： Private Sub Command1_Click() s=0 For i=1 To 15 x=2 * i 一 1 If X Mod 3=0 Then s=s+1 Next i Label1Caption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是( )。（分数：2.00）A.1B.5C.27D.4536.阅读程序： Private Sub Form_Click() x=50 For i=1 To 4 y=InputBox(“请输入一个整数“) y=Val(Y) If y Mod 5=0 Then a=a+y x=y Else a=a+x En
17、d If Next i Print a End Sub 程序运行后，单击窗体，在输入对话框中依次输入 15、24、35、46，输出结果为( )。（分数：2.00）A.100B.50C.120D.7037.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim array1(10，10)As Integer Dim i As Integer，j As Integer For i=1 To 3 For i=2 To 4 array1(i，j)=i+j Next j Next i
18、Text1Text=array1(2，3)+array1(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是( )。（分数：2.00）A.15B.14C.13D.1238.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() d：0 c=10 X=Array(10，12，21，32，24) For i=1 To 5 If x(i)c Then d=d+x(i) c=x(i) Else d=dc End If Next i Print d End Sub 程序运行后，如果
19、单击命令按钮，则在窗体上输出的内容为( )。（分数：2.00）A.89B.99C.23D.7739.假定有以下通用过程： Function Fun(n As Integer)As Integer X=n * n Fun=x 一 11 End Function 在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer For i=1 To 2 y=Fun(i) Print y； Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是( )。（分数：2.00）A.1
20、3B.10 8C.一 10 7D.0 540.设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(X) Print x：y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。（分数：2.00）A.10 5B.20 40C.20 5D.10 40二、基本
21、操作题(总题数：1，分数：2.00)41.(1)在名称为 Form1、标题为“输入”、最大化按钮失效的窗体上画一个名称为 Label1 的标签控件，其标题为“输入密码”；再向窗体内画一个名称为 Text1 的文本框控件，并清空其中的文本。程序执行时，用户在文本框中最多可输入由 6 个字符组成的密码，密码字符在文本框中显示为“*”，其画面如图所示，请设置相应属性。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1vbp，窗体文件名为sjt1frm。 (2)在名称为 Form1 的窗体上，画一个名称为 Shape1 的形状控件，将其形状设置为圆、背景样式设置为不透明；再向窗体上画一个名称
22、为 HScroll1 的水平滚动条控件，并将滚动条所能表示的最小值设置为 0、所能表示的最大值设置为 255。 要求：编写适当的事件过程，使得程序运行时，当单击水平滚动条：HScroll1 两端的箭头时，能将 Shape1 中的背景颜色设置为由红、绿、蓝三原色组合形成的一种颜色，其中，红色的分量值为滚动条中滚动框当前位置所表示的值，绿色、蓝色的分量值都为 0。程序运行示意图如图所示。 提示：系统库函数 RGB 可将红、绿、蓝三原色组合，并返回组合后的颜色值。 注意：要求程序中不能使用变量，每个事件过程中只能写一条语句(不得使用选择语句或循环语句)。保存时必须存放在考生文件夹下，工程文件名为 s
23、jt2vbp，窗体文件名为 Sjt2frm。 （分数：2.00）_三、简单应用题(总题数：1，分数：2.00)42.(1)在考生文件夹中有一个工程文件 sjt3vbp。程序的功能是输入用户名和密码。程序运行时，当输入密码到文本框 Text7 中时，如果“显示密码”复选框没有被选中，则在文本框 Text3 中同时显示“#”(如图所示)；如果“显示密码”复选框被选中，再重新输入密码时，则在 Text3 中同时显示的是密码字符本身。 在给出的窗体文件中已经添加了全部控件，但程序不完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容。 注意：不能修改程序的其他部分和控件属性，最后将修改后的文件按
24、原文件名进行存盘。 （分数：2.00）_四、综合应用题(总题数：1，分数：2.00)43.在窗体上画 1 个文本框，名称为 Text1(multiline 属性为 True)，然后再添加三个命令按钮，名称分别为 Command1、Command2 和 Command3，标题分别为“读数”、“统计”和“存盘”，如图所示。程序的功能是：单击“读数”按钮，则把考生文件夹下的 in5txt 文件中的所有英文字符放入 Text1(MutiLine属性为 True)中；单击“统计”按钮，找出并统计英文字母 i，j，k，1，m，n(不区分大小写)各自出现的次数；单击“存盘”按钮，将字母 i 到 n 出现次数
25、的统计结果依次存到考生目录下的顺序文件 out5txt中。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为 sjt5vbp，窗体文件名保存为sit5frm。 （分数：2.00）_国家二级（VB）机试模拟试卷 177 答案解析(总分：86.00，做题时间：90 分钟)一、选择题(总题数：40，分数：80.00)1.下列叙述中正确的是( )。（分数：2.00）A.算法就是程序B.设计算法时只需要考虑数据结构的设计C.设计算法时只需要考虑结果的可靠性D.以上三种说法都不对 解析：解析：算法是指解题方案的准确而完整的描述，算法不等于程序，也不等于计算方法，所以 A 错误。设计算法时不仅要考虑对数
26、据对象的运算和操作，还要考虑算法的控制结构。2.下列叙述中正确的是( )。（分数：2.00）A.有一个以上根结点的数据结构不一定是非线性结构B.只有一个根结点的数据结构不一定是线性结构 C.循环链表是非线性结构D.双向链表是非线性结构解析：解析：线性结构应满足：有且只有一个根结点与每个结点最多有一个前件，也最多有一个后件，所以 B 正确。所以有一个以上根结点的数据结构一定是非线性结构，所以 A 错误。循环链表和双向链表都是线性结构的数据结构。3.下列关于二叉树的叙述中，正确的是( )。（分数：2.00）A.叶子结点总是比度为 2 的结点少一个B.叶子结点总是比度为 2 的结点多一个 C.叶子结
27、点数是度为 2 的结点数的两倍D.度为 2 的结点数是度为 1 的结点数的两倍解析：解析：根据二叉树的基本性质 3：在任意一棵二义树中，度为 0 的叶子结点总是比度为 2 的结点多一个。所以选择 B。4.软件生命周期中的活动不包括( )。（分数：2.00）A.市场调研 B.需求分析C.软件测试D.软件维护解析：解析：软件生命周期可以分为软件定义、软件开发与软件运行维护三个阶段。主要活动阶段是：可行性研究与计划阶段，需求分析，软件设计，软件实现，软件测试，运行和维护，所以选择 A。5.某系统总体结构图如下图所示： （分数：2.00）A.7B.6C.3 D.2解析：解析：根据总体结构图可以看出该树
28、的深度为 3，比如：XY 系统功能 2功能 21，就是最深的度数的一个表现。6.程序调试的任务是( )。（分数：2.00）A.设计测试用例B.验证程序的正确性C.发现程序中的错误D.诊断和改正程序中的错误 解析：解析：程序调试的任务是诊断和改正程序中的错误。7.下列关于数据库设计的叙述中，正确的是( )。（分数：2.00）A.在需求分析阶段建立数据字典 B.在概念设计阶段建立数据字典C.在逻辑设计阶段建立数据字典D.在物理设计阶段建立数据字典解析：解析：数据字典是在需求分析阶段建立，在数据库设计过程中不断修改、充实和完善的。8.数据库系统的三级模式不包括( )。（分数：2.00）A.概念模式B
29、.内模式C.外模式D.数据模式 解析：解析：数据库系统的三级模式是概念模式、外模式和内模式，所以选择 D。9.有三个关系 R、S 和 T 如下： （分数：2.00）A.自然连接 B.交C.投影D.并解析：解析：自然连接是一种特殊的等值连接，它要求两个关系中进行比较的分量必须是相同的属性组，并且在结果中把重复的属性列去掉，所以根据 T 中元组可以判断 R 和 S 做的是自然连接操作。10.下列选项中属于面向对象设计方法主要特征的是( )。（分数：2.00）A.继承 B.自顶向下C.模块化D.逐步求精解析：解析：面向对象基本方法的基本概念有对象、类和实例、消息、继承与多态性，所以选择 A。11.以
30、下合法的 VB 变量名是( )。（分数：2.00）A.#_1B.123_aC.stringD.x_123 解析：解析：VB 中变量的命名规则为：必须以字母或汉字开头由字母、汉字、数字或下划线组成不能使用 VB 已经占用的关键字。#_1 中#是类型符号，变量名中不能用 VB 保留符号。故不合法。123_a 以数字开头不合法。string 是 VB 的关键字，也不合法。故 D 选项正确。12.以下关于 VB 的叙述中，错误的是( )。（分数：2.00）A.VB 采用事件驱动方式运行B.VB 既能以解释方式运行，也能以编译方式运行C.VB 程序代码中，过程的书写顺序与执行顺序无关D.VB 中一个对象
31、对应一个事件 解析：解析：VB 中一个对象可以对应一个或多个事件，事件可由用户或系统触发，触发后执行相应的事件过程。不过，不一定一个对象的昕有事件过程都执行，响应哪个事件过程就执行哪个。故 D 选项错误。13.有如下数据定义语句： Dim X，Y As Integer 以上语句表明( )。（分数：2.00）A.X、Y 均是整型变量B.X 是整型变量，Y 是变体类型变量C.X 是变体类型变量，Y 是整型变量 D.X 是整型变量，Y 是字符型变量解析：解析：用 Dim 可同时定义多个变量，但变量要分别声明其数据类型，如果不声明数据类型，默认是Variant 变体型变量。 本题中，变量 X 定义时没
32、声明数据类型，所以为 Variant 型变量，变量 Y 是整型变量。故 C 选项正确。14.以下关于控件数组的叙述中，正确的是( )。（分数：2.00）A.数组中各个控件具有相同的名称 B.数组中可包含不同类型的控件C.数组中各个控件具有相同的 Index 属性值D.数组元素不同，可以响应的事件也不同解析：解析：控件数组中各控件具有相同的名称，而且类型是相同的，但 Index 属性值不同。数组中各控件响应的事件是相同，用 Index 属性值来区分每个控件。故 A 选项正确，B、C、D 选项错误。15.以下关于 VB 文件的叙述中，错误的是( )。（分数：2.00）A.标准模块文件不属于任何一个
33、窗体B.工程文件的扩展名为frm C.一个工程只有一个工程文件D.一个工程可以有多个窗体文件解析：解析：T 程文件的扩展名为vbp，故 B 选项错误。16.设 x 为一整型变量，且情况语句的开始为：Select Case x，则不符合语法规则的 Case 子句是( )。（分数：2.00）A.Case Is20B.Case 1 To 10C.Case 00 或 Is50，Int(a3)，a Mod 2) 当 a=52 时，x 的值是( )。（分数：2.00）A.0B.1C.17 D.18解析：解析：首先计算 Int(a3)即 Int(523)=Int(17)=17，52 MOD 2 结果为 0。
34、 再计算IIf(5250，17，0)，5250 结果为 True，所以 IIF 函数返回 17，则 x 值为 17，故选 C。18.设有如下数组定义语句： Dim a(一 1 To 4，3)As Integer 以下叙述中正确的是( )。（分数：2.00）A.a 数组有 18 个数组元素B.a 数组有 20 个数组元素C.a 数组有 24 个数组元素 D.语法有错解析：解析：本题定义了一个二维数组，第一维的下标一 1 to 4，即为一 1，0，1，2，3，4(共 6 行)，第二维下标 3，即 0to 3(0，1，2，3 共 4 列)，6*4=24 二维数组有 24 个数组元素。故选 C。19.
35、以下叙述中错误的是( )。（分数：2.00）A.Sub Main 是定义在标准模块中的特定过程B.一个工程中只能有一个 Sub Main 过程C.Sub Main 过程不能有返回值D.当工程中含有 Sub Main 过程时，工程执行时一定最先执行该过程 解析：解析：VB 工程的启动对象有：Sub Main 过程(在标准模块中定义)、窗体(在多个窗体可选一个窗体启动)，我们可以通过在“工程属性”对话框中设置启动对象来实现，设置哪个就用哪个启动。所以当工程中含有 Sub Main 过程时，工程执行不一定最先执行该过程，也可以通过窗体启动。故选项 D 错误。20.关于随机文件，以下叙述中错误的是(
36、)。（分数：2.00）A.使用随机文件能节约空间 B.随机文件记录中，每个字段的长度是固定的C.随机文件中，每个记录的长度相等D.随机文件的每个记录都有一个记录号解析：解析：随机文件中的每一行是一条记录，每条记录的长度是固定的、相等的，并且都有一个记录号。Open 语句中的 Len 用于指定记录长度，当指定长度小于记录实际长度时将产生错误；大于实际长度时，可以写入，但浪费空间，所以随机文件占据磁盘空间较大，故选项 A 错误。21.在名称为 Framel 的框架中，有两个名称分别为 0p1、op2 的单选按钮，标题分别为“单程”、“往返”，如图所示。 （分数：2.00）A.若仅把 Framel
37、的 Enabled 属性设为 False，则 op1、op2 仍可用B.对于上图，op1Value 的值为 True C.对于上图，执行 Op1Value=False 命令，则“往返”单选按钮被选中D.对于上图，执行 Op1Value=0 命令，程序出错解析：解析：当 Framel 的 Enabled 属性设为 False 后，框架 Framel 变为不可用，它里面放的两个单选按钮也就变为不可用，故 A 选项错误； 当 Op1Value 为 False 时，“单程”和“往返”单选按钮都处于未选中状态，故 C 选项错误； Op1Value 的值为 0，即为 False，语句正确，没有程序错误，故
38、 D 选项说法错误； 根据图可只，“单程”单选按钮处于选中状态，Op1Value 的值为 True，故 B 选项正确。22.以下能够设置控件焦点的方法是( )。（分数：2.00）A.SetFocus B.GotFocusC.LostFocusD.TabStop解析：解析：G0tFoeus 和 LostFocus 是控件获得焦点和失去焦点时触发的两个事件；TabStop 是控件的属性；SetFocus 方法是控件设置、获得焦点的方法。故选 A。23.使用 Line 控件在窗体上画一条从(0，0)到(600，700)的直线，则其相应属性的值应是( )。（分数：2.00）A.X1=0，X2=600，
39、Y1=0，Y2=700 B.Y1=0，Y2=600，Xl=0，X2=700C.X1=0，X2=0，Y1=600，Y2=700D.Y1=0，Y2=0，X1=600，X2=700解析：解析：X1、Y1、X2、Y2 属性是直线的起点、终点坐标。故选 A。24.设有窗体的 Form_MouselVlove 事件过程如下： Private Sub Form_MouseMove(Button As Integer，Shift As Integer，X As Single，Y A8 Single) If(Button And 3)=3 Then Print“检查按键“ End If End Sub 关于上述
40、过程，以下叙述中正确的是( )。（分数：2.00）A.按下鼠标左键时，在窗体上显示“检查按键”B.按下鼠标右键时，在窗体上显示“检查按键”C.同时按下鼠标左、右键时，在窗体上显示“检查按键” D.不论做何种操作，窗体上都不会显示解析：解析：MoseMove 事件中的 Button 表示鼠标所有按键的状态。用 0、1、2 三个位表示左、右、中键，当按下某个键时。相应位是 1，否则是 0。三位的二进制数也可转换为十进制数，作为 Button 的值。如表：25.窗体上有一个名称为 CD1 的通用对话框，一个名称为 Command1 的命令按钮，相应的事件过程如下： Private Sub Comma
41、nd1_Click() CD1Filter=“All File |*|Text File|*txt|PPT|*ppt“ CD1FilterIndex=2 CD1InitDir=“C：“ CD1FileNarne=“default“ CD1ShowSave End Sub 关于上述过程，以下叙述中正确的是( )。（分数：2.00）A.默认过滤器为“*ppt”B.指定的初始目录为“C：” C.打开的文件对话框的标题为“default”D.上面事件过程实现保存文件的操作解析：解析：通用对话框的 FilterIndex 属性为 1 时表示默认过滤器为第 1 个文件类型，为 2 时表示为第2 个文件类型
42、。InitDir 属性值指定通用对话框的初始目录。FileName 属性表示对话框中默认的文件名。ShowSave 方法表示打开另存为对话框，执行保存文件的操作。26.以下关于窗体的叙述中，错误的是( )。（分数：2.00）A.Hide 方法能隐藏窗体，但窗体仍在内存中B.使用 Show 方法显示窗体时，一定触发 Load 事件 C.移动或放大窗体时，会触发 Paint 事件D.双击窗体时，会触发 DblClick 事件解析：解析：窗体的 Load 事件是把窗体装入工作区的事件，即装入内存，然后窗体才显示出来，使用Hide 方法可以使窗体隐藏，但窗体仍在内存中，使用 Show 方法能使窗体显示
43、出来。当窗体被移动或放大时，或者窗口移动时覆盖了一个窗体时，触发 Paint 事件。双击窗体时会触发窗体的 DblCliek 事件。27.下列控件中，没有 Caption 属性的是( )。（分数：2.00）A.单选按钮B.复选框C.列表框 D.框架解析：解析：列表框控件没有 Caption 属性。28.将数据项“Student”添加到名称为 List1 的列表框中，并使其成为列表框第一项的语句为( )。（分数：2.00）A.List1AddItem“Student“，0 B.List1AddItem“Student“1C.List1AddItem 0，“Student“D.List1AddIt
44、em 1，“Student“解析：解析：List 控件的 Addhem 方法的语法是：Addhem(String，index)。其中 index 是列表框中列表项的索引值，第一项的索引值为 0。29.下列针对框架控件的叙述中，错误的是( )。（分数：2.00）A.框架是一个容器控件B.框架也有 Click 和 DblClick 事件C.框架也可以接受用户的输入 D.使用框架的主要目的是为了对控件进行分组解析：解析：框架是一个容器控件，用于将屏幕上的对象分组。框架常用的事件是 Click 和 DblClick，它不接受用户输入，不能显示文本和图形，也不能与图形相连。30.窗体上有一个名为 Com
45、mand1 的命令按钮，并有下面的程序： Private Sub Command1_Click() Dim arr(5)As Integer For k=1 To 5 arr(k)=k Next k prog arr() For k=1 To 5 Print arr(k)； Next k End Sub Sub prog(a()As Integer) n=UBound(a) For i=n To 2 step1 For j=1 To n1 if a(j)A.1 2 3 4 5B.5 4 3 2 1 C.0 1 2 3 4D.4 3 2 1 0解析：解析：程序对数组元素赋初值为 1、2、3、4、
46、5。ubound 函数返回数组可用的最大下标，过程prog 的功能是遍历数组对数组中的元素进行排序，由条件 a(j)=0 Then count(n)=count(n)+1 End If Next k m=eount(0) For k=1 To 25 If mA.0B.1C.2D.3 解析：解析：根据题中的程序代码可知，ch 为输入字符串的大写状态，第一个 For 循环是依次取出字母，n 为取出字母与“A”字符的 ASCII 码差值，然后再赋给数组 count()；第二个 For 循环是找出数组count()中的最小值，因此，最后窗体上输出的结果为 3，即选项 D。32.在窗体上画一个命令按钮和
47、一个文本框，其名称分别为 Command1 和 Text1，把文本框的 Text 属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() a=InputBox(“Enter an integer“) b=Text1Text Text1Text=b+a End Sub 程序运行后，在文本框中输入 456，然后单击命令按钮，在输入对话框中输入 123，则文本框中显示的内容是( )。（分数：2.00）A.579B.123C.456123 D.456解析：解析：默认情况下，InputBox 的返回值是一个字符串，因此程序中 a=“123”，b=“456”，b+
48、a=“456”+“123”=“456123”。因此 C 选项正确。另外，使用字符连接运算符“+”时，如果连接的是字符串和数值，可根据返回值类型判断，若返回值类型为字符串，则它将数值转换成字符串后与另一字符串连接成新字符串返回；若返回值类型为数值，则它要求字符串中只能包含数字，而不能有其他字符，否则报“类型不匹配”的错误。33.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程： Prirate Sub Command1_Click() Dim i As Integer，n As Integer For i=0 To 50 i=i+3 n=n+1 If i10 Then Exit For Next Text1Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是( )。（分数：2.00）A.2B.3 C.4D.5解析：解析：程序中 For 循环的结束有两种情况，一种是循环完指定的次数，一种是达到一定的条件后直接退出循环。由于在循环体中循环变量 i 的值被修改：i=i+3，因此，每次循环开始时 i 的取值为0，4，8，i 为 8 时执行
