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 时执行
copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1