1、国家二级（ VB）机试模拟试卷 94及答案与解析 一、选择题 1 下列叙述中正确的是 （ A）程序执行的效率与数据的存储结构密切相关 （ B）程序执行的效率只取决于程序的控制结构 （ C）程序执行的效率只取决于所处理的数据量 （ D）以上说法均错误 2 下列与队列结构有关联的是 （ A）函数的递归调用 （ B）数组元素的引用 （ C）多重循环的执行 （ D）先到先服务的作业调度 3 对下列二叉树进行前序遍历的结果为 （ A） DYBEAFCZX （ B） YDEBFZXCA （ C） ABDYECFXZ （ D） ABCDEFXYZ 4 下面属于白盒测试方法的是 （ A）等价类划分法 （ B）
2、逻辑覆盖 （ C）边界值分析法 （ D）错误推测法 5 下面对对象概念描述正确的是 （ A）对象间的通信靠消息传递 （ B）对象是名字和方法的封装体 （ C）任何对象必须有继承性 （ D）对象的多态性是指一个对象有多个操作 6 下面对对象概念描述正确的是 （ A）对象间的通信靠消息传递 （ B）对象是名字和方法的封装体 （ C）任何对象必须有继承性 （ D）对象的多态性是指一个对象有多个操作 7 软件设 计中模块划分应遵循的准则是 （ A）低内聚低耦合 （ B）高耦合高内聚 （ C）高内聚低耦合 （ D）以上说法均错误 8 下面描述中不属于数据库系统特点的是 （ A）数据共享 （ B）数据完整
3、性 （ C）数据冗余度高 （ D）数据独立性高 9 数据库设计过程不包括 （ A）概念设计 （ B）逻辑设计 （ C）物理设计 （ D）算法设计 10 有三个关系 R、 S和 T如下： 则由关系 R和 S得到关系 T的操作是 （ A）自然连接 （ B）交 （ C）投影 （ D）并 11 设计窗体时，双击窗体上没有控件 的地方，打开的窗口是 ( )。 （ A）代码窗口 （ B）属性窗口 （ C）工具箱窗口 （ D）工程窗口 12 要计算 x的平方根并放入变量 y，正确的语句是 ( )。 （ A） y Exp(x) （ B） y Sgn(x) （ C） y Int(x) （ D） y Sqr(x)
4、 13 为了用键盘打开菜单和执行菜单命令，第一步应按的键是 ( )。 （ A）功能键 F10或 Alt （ B） Shift功能键 F4 （ C） Ctrl或功能键 F8 （ D） Ctrl Alt 14 如果在 Visual Basic集成环境 中没有打开属性窗口，下列可以打开属性窗口的操作是 ( )。 （ A）用鼠标双击窗体的任何部位 （ B）执行 “工程 “菜单中的 “属性窗口 “命令 （ C）按 Ctrl F4键 （ D）按 F4键 15 下列有语法错误的赋值语句是 ( )。 （ A） y 7 9 （ B） s m n （ C） Text1.Text 10 （ D） m n 12 16
5、 在面向对象的程序设计中，可被对象识别的动作称为 ( )。 （ A）方法 （ B）事件 （ C）过程 （ D）函数 17 设： a 12， b 5， c 7，表达式 x (ac a Mod b) Int(13 / 5)的值是 ( )。 （ A） 5 （ B） 6 （ C） 7 （ D） 9 18 在程序中要使用 Array函数给数组 arr赋初值，则以下数组变量定义语句中错误的是 ( )。 （ A） Static arr （ B） Dim arr(5) （ C） Dim arr() （ D） Dim arr As Variant 19 如果一个菜单项的 Enabled属性被设置为 False，
6、则程序运行时，该菜单项( )。 （ A）不显示 （ B）显示但无效 （ C）有效可用 （ D）不显 示但有效可用 20 顺序文件在一次打开期间 ( )。 （ A）只能读，不能写 （ B）只能写，不能读 （ C）既可读，又可写 （ D）或者只读，或者只写 21 如果把命令按钮的 Cancel属性设置为 True，则程序运行后 ( )。 （ A）按 Esc键与单击该命令按钮的作用相同 （ B）按回车键与单击该命令按钮的作用相同 （ C）按 Esc键将停止程序的运行 （ D）按回车键将中断程序的运行 22 为了使命令按钮的 Picture、 DownPicture或 DisabledPicture属
7、性生效，必须把 它的 Style属性设置为 ( )。 （ A） 0 （ B） 1 （ C） True （ D） False 23 下列说法中，错误的是 ( )。 （ A）将焦点移至命令按钮上，按 Enter键，则引发命令按钮的 Click事件 （ B）单击命令按钮，将引发命令按钮的 Click事件 （ C）命令按钮没有 Picture属性 （ D）命令按钮不支持 DblClick事件 24 为了将 “联想电脑 “作为数据项添加到列表框 List1的最前面，可以使用语句( )。 （ A） List1.AddItem “联想电脑 “， 0 （ B） List1.AddItem “联想电脑 “， 1
8、 （ C） List1.AddItem 0， “联想电脑 “ （ D） List1.AddItem 1， “联想电脑 “ 25 设运行程序时弹出的菜单如图所示 .关于该菜单，以下叙述中错误的是 ( )。（ A）菜单中能够显示分隔线是因为该菜单项的标题为 “ “ （ B）分隔线对应的菜单项的 Name属性可以为空 （ C）退出菜单项的有效性属性被设为 False （ D）使用 PopupMenu方法能够显示如图所示的菜单 26 窗体上有一个列表框控件 List1。以下叙述 中错误的是 ( )。 （ A） List1中有 ListCount 1个列表项 （ B）当 List1.Selected(i
9、) True，表明第 i项被选中 （ C）设置某些属性，可以使列表框显示多列数据 （ D） List1.Text的值是最后一次被选中的列表项文本 27 如果要在窗体上使用 2组单选按钮，每组都可以有一个被选中，则应该做的是( )。 （ A）把 1组单选按钮画在窗体的左边，另 1组画在右边 （ B）先画 2组单选按钮，再画 2个框架控件把 2组单选按钮分别框起来 （ C）先画 2个框架控件，再把 2组单选按 钮分别画在不同的框架中 （ D）因为 1个窗体中只有 1个单选按钮可以被选中，所以需要使用 2个窗体 28 窗体上有一个 Text1文本框，并编写了下面事件过程： Private Sub T
10、ext1_KeyPress(KeyAscii As Integer) KeyAscii KeyAscii 3 End Sub 程序运行时，在文本框中输入字符 “A“，则在文本框中实际显示的是 ( )。 （ A） A （ B） B （ C） C （ D） D 29 在窗体上添加 “控件 “的正确的操作方式是 ( )。 （ A）先单击 工具箱中的控件图标，再单击窗体上适当位置 （ B）先单击工具箱中的控件图标，再双击窗体上适当位置 （ C）直接双击工具箱中的控件图标，该控件将出现在窗体上 （ D）直接将工具箱中的控件图标拖动到窗体上适当位置 30 窗体上有一个名称为 Command1的命令按钮，事
11、件过程如下： Private Sub Command1_Click() Dim arr_x(5， 5)As Integer For i 1 To 3 For j 2 To 4 arr_x(i， j) i * j Next j Next i Print arr_x(2， 1)； arr_x(3， 2)； arr_x(4， 3) End Sub 运行程序，并单击命令按钮，窗体上显示的内容为 ( )。 （ A） 0 6 0 （ B） 2 6 0 （ C） 0 6 12 （ D） 2 6 12 31 在窗体上画一个名称为 Command1的命令按钮，并编写如下程序： Function Fun(x) y
12、 0 If x0， 1， IIf(x0 Then x 1 ElseIf x0 Then Print 1 ElseIf x0 Print 1 Case Is0 Then If x0 Then Print 1 ElseIf x0,1， IIf(x0时输出 1， x不大于 0时，如果 x0则输出 1否则输出 0。 D)选项缺少 End If语句程序段无法正确运行。 36 【正确答案】 B 【试题解析】 根据公式 4 4/3 4/5 4/7 4/9 4/11 可知 sign 是作为符号翻转的，即一次下一次就为，因此空缺处应该填 sign，这样就可使符号循环一次翻转一次。 37 【正确答案】 D 【试题
13、解析】 将二进制数转换为十进制数需要将二进制数的每一位取出来进行运算，从一个数值字符串中截取一位数字字符要使用 Mid函数，因此在程序空缺处该填入 Mid。 38 【正确答案】 B 【试题解析】 程序执行过程如下： 39 【正确答案】 A 【试题解析】 在窗体事件中，鼠标按键按下激发 MouseDown事件，鼠标按钮松开激发 MouseUp 事件，鼠标按下并松开后激发 Click事件，所以这三个事件的顺序是 MouseDown、 MouseUp、 Click，因此输出文字的顺序是 “欢迎！ “、 “热烈欢迎！ “、 “Welcome！ “。 40 【正确答案】 B 【试题解析】 变量 b定义为
14、 Static即静态变量，它的特点是每次调用都会保留上次的值。程序 click 事件中调用了 3次 proc(n)，即 proc(2)： 第一次， a a 1 0 1 1， b b 1 0 1 1 ， proc a*b i 1*1+2=3; 第二次， a a 1 0 1 1， b b 1 1 1 2 ， proc a*b i 1*2+2=4； 第三次， a a 1 0 1 1， b b 1 2 1 3 ， proc a*b i 1*3+2=5； 因此输出的结果为 3 4 5。 二、基本操作题 41 【正确答案】 步骤 1：新建一个窗体，按照题目要求建立列表框控件并设置窗体及列表框属性，如图 3
15、 29所示。程序中用到的控件及属性见表 3 41。 步骤 2： 调试并运行程序，关闭程序后按题目要求存盘。 (2)步骤 1：建立界面，添加一个命令按钮，设置其 Name：属性为 Command1， Caption属性为 “弹出菜单 ”。然后建立一个菜单，菜单的属性见表 3 42。步骤 2：打开代码编辑窗口，在指定位置编写如下代码。 Private Sub CommandlClick() PopupMenu menu1显示菜单 menu1End Sub 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。 【试题解析】 （ 1）列表框的 Style属性只能在设汁时确定。用于控制控件的 外观，其数
16、值可以设置为 0(标准样式 )和 1(复选框样式 )。通过列表框的 Name和Width属性来设置列表桩的名称和宽，通过其 List属性设置列表项。 (2)要创建弹出式菜单需要先用菜单编辑器来建立菜单，并将其主菜单项的可见(Visiblc)属性值设置为不可见。然后通过对象的 Command1_Click 事什，执行对象的 PopupMenu 方法来显示菜单。 三、简单应用题 42 【正确答案】 步骤 1：新建一个窗体，按照题目要求建立名称为 “Text1”的文本框控件及一个弹出式菜单并设置菜单属性，程序中用 到菜单属性见表 3 32。步骤 2：打开代码编辑窗口，在指定位置编写如下代码。 Pri
17、vate Sub M1 Click() Text1 FontBold=True设置字体为加粗 End SubPrivate Sub M2 Click() Text1 FontItalic=True设置字体为斜体 End SubPrivate Sub M3 Click() Text1 FontUnderline=True为文字加下划线 End Sub Private Sub Text1 MouseDown(Button As Integer， Shift As Integer， X As Single， Y As Single) If Button=2 Then判断是否执行该事件 Me Popu
18、pMenu Format显示菜单 End If End Sub 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。 (2)步骤 1：打开本题工程文件，按照题目要求设置属性，如图 3 26所示。 步骤 2：打开代码编辑窗口，去掉程序中的注释符，将问号改为正确的内容，并在指定位置编写代码。Private Sub C1 C1ick() Dim k AS Integer Form2 Show当单击 “提交 “按钮时。则显示Form2 Form2 Print Form1 L1 Caption； Form1 Text1 Form2 Print Form1 L2 Caption： Form1 Text2
19、Form2 Print Form1 L3 Caption；Form1 Text3 Form2 Print Form1 Frame1 Caption;“:“; 取框架 Frame1的标题名称 “性别 “ For k=0 To 1 If Forml Opl(k) Value Then 通过下一条语句确定 K Form2 Print Forml Opl(k) Caption End If Next kEnd SubPrivate Sub Form Load()将 Password Char属性设为 *则密码输入后显示 * Text2 PasswordChar=“*“End Sub需考生鳊写的 For
20、m2中的代码 Private Sub C1_Click() EndEnd SubPrivate Sub C2_Click() Unload Form2End Sub 步骤 3：调试并运行 程序，关闭程序后按题目要求存盘。 【试题解析】 (1)PopupMenu 方法用来显示弹出菜单，语法格式为： objeet PopupMenu menuname， flags， x， y， boldcommand 要创建弹出式菜单需先用菜单编辑器来建立菜单，并将其主菜单项的可见(Visible)属性值设置为 False，然后在对象的 MouseDown(或 Mouse Up)事件过程中判断该事件的 Butto
21、n 参数值是否为 2，如果是则执行对象的 PopupMenu 方法来显示菜单。 (2)修改窗体标 题是通过设置其 Caption属性来实现的， ControtBox 属性用于设置控制菜单栏是否在窗体标题栏中显示，为在窗体标题栏中只显示标题信息，需将该属性值设置为 False。文本框的 PasswordChar属性可设置用于屏蔽在文本框中输入内容的字符，例如 “*”。 四、综合应用题 43 【正确答案】 步骤 1：打开本题丁程文件。 步骤 2：打开代码编辑窗口，去掉程序中的注释符，将问号改为正确的内容。 Dim stepy As Integer 纵向移动增量 Dim stepx As Integ
22、er 横向移动增量 Const LEFTBUTTON 1 Private Sub Form MouseDown(Button As Integer， Shift As Integer， X As Single， Y As Single) Dim x0 As Integer， y0 As Integer， a AsSingle， radius Asjnteger radius=Shape1 Width 2 圆的半径 I f Button=LEFT BUTTON Then 单击鼠标左键移动 x0=Shape1 Left+radius圆心的 x坐标 y0 Shapel Top radius圆心的 y坐标 If x=x0 Then垂直移动 stepy Sgn(Y y0)*50
