1、国家二级（ VB）机试模拟试卷 68及答案与解析 一、选择题 1 软件需求规格说明书的作用不包括 （ A）软件验收的依据 （ B）用户与开发人员对软件要做什么的共同理解 （ C）软件设计的依据 （ D）软件可行性研究的依据 2 下面属于黑盒测试方法的是 （ A）语句覆盖 （ B）逻辑覆盖 （ C）边界值分析 （ D）路径覆盖 3 下面不属于软件设计阶段任务的是 （ A）软件总体设计 （ B）算法设计 （ C）制定软件确认测试计划 （ D）数据库设计 4 Visual Basic集成环境由若干窗 口组成，其中不能隐藏 (关闭 )的窗口是 ( )。 （ A）主窗口 （ B）属性窗口 （ C）立即窗
2、口 （ D）窗体窗口 5 为了声明一个长度为 128个字符的定长字符串变量 StrD，以下语句中正确的是( )。 （ A） Dim StrD As String （ B） Dim StrD As String(128) （ C） Dim StrD As String128 （ D） Dim StrD As String*128 6 为了用键盘打开菜单和执行菜单命令，第一步应按的键是 ( )。 （ A）功能键 F10或 Alt （ B） Shift功能键 F4 （ C） Ctrl或功能键 F8 （ D） Ctrl Alt 7 如果在 Visual Basic集成环境中没有打开属性窗口，下列可以打
3、开属性窗口的操作是 ( )。 （ A）用鼠标双击窗体的任何部位 （ B）执行 “工程 “菜单中的 “属性窗口 “命令 （ C）按 Ctrl F4键 （ D）按 F4键 8 假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗体的属性，预先应执行的操作是 ( )。 （ A）单击窗体上没有控件的地方 （ B）单击任意一个控件 （ C）双击任意一个控件 （ D）单击属性窗口的标题栏 9 下列操作中不能向工程添加窗体的是 ( )。 （ A）执行 “工程 “菜单中的 “添加窗体 “命令 （ B）单击工具栏上的 “添加窗体 “按钮 （ C）右击窗体，在弹出的菜单中选择 “添加窗体 “命令
4、（ D）右击工程资源管理器，在弹出的菜单中选择 “添加 “命令，然后在下一级菜单中选择 “添加窗体 “命令 10 设 a 2， b 3， c 4， d 5， 表达式 Not aa c的值是 ( )。 （ A） 1 （ B） 1 （ C） True （ D） False 11 鼠标拖放控件要触发两个事件，这两个事件是 ( )。 （ A） DragOver事件和 DragDrop事件 （ B） Drag事件和 DragDrop事件 （ C） MouseDown事件和 KeyDown事件 （ D） MouseUp事件和 KeyUp事件 12 在窗体上画一个通用对话框，程序运行中用 ShowOpen方
5、法显示 “打开 “对话框时，希望在该对话框的 “文件类型 “栏中只显示扩展名为 DOC的文件，则在设计阶段应把通用对话框的 Filter属性设置为 ( )。 （ A） (*.DOC*. DOC （ B） (*. DOC|(.DOC （ C） (*. DOC|*. DOC （ D） (*.DOC|*. DOC 13 以下叙述中错误的是 ( )。 （ A） Print #语句和 Write #语句都可以向文件中写入数据 （ B）用 Print #语句和 Write #语句所建立的顺序文件格式总是一样的 （ C）如果用 Print #语句把数据输出到文件，则各数据项之间没有逗号分隔，字符串也不加双引
6、号 （ D）如果用 Write #语句把数据输出到文件，则各数据项 之间自动插入逗号，并且把字符串加上双引号 14 如果把命令按钮的 Cancel属性设置为 True，则程序运行后 ( )。 （ A）按 Esc键与单击该命令按钮的作用相同 （ B）按回车键与单击该命令按钮的作用相同 （ C）按 Esc键将停止程序的运行 （ D）按回车键将中断程序的运行 15 为了使命令按钮的 Picture、 DownPicture或 DisabledPicture属性生效，必须把它的 Style属性设置为 ( )。 （ A） 0 （ B） 1 （ C） True （ D） False 16 列表框中 被选中
7、的数据项的位置可以通过一个属性获得，这个属性是 ( )。 （ A） List （ B） ListIndex （ C） Text （ D） ListCount 17 为了使一个复选框被禁用 (灰色显示 )，应把它的 Value属性设置为 ( )。 （ A） 0 （ B） 1 （ C） 2 （ D） False 18 为了使文本框显示滚动条，除要设置 ScrollBars外，还必须设置的属性是( )。 （ A） AutoSize （ B） Alignment （ C） Multiline （ D） MaxLength 19 在窗体上画一个通用对话框，其名称为 CommonDialog1，则下列与C
8、ommonDialog1.ShowOpen方法等效的语句是 ( )。 （ A） CommonDialog1.Action 1 （ B） CommonDialog1.Action 2 （ C） CommonDialog1.Action 3 （ D） CommonDialog1.Action 4 20 如果改变驱动器列表框的 Drive属性，则将触发的事件是 ( )。 （ A） Change （ B） Scroll （ C） KeyDown （ D） KeyUp 21 为了调整图像框的大小以与其中的图形相适应，必须把它的 Stretch属性设置为( )。 （ A） True （ B） False
9、（ C） 1 （ D） 2 22 在窗体上添加 “控件 “的正确的操作方式是 ( )。 （ A）先单击工具箱中的控件图标，再单击窗体上适当位置 （ B）先单击工具箱中的控件图标，再双击窗体上适当位置 （ C）直接双击工具箱中的控件图标，该控件将出现在窗体上 （ D）直接将工具箱中的控件图标拖动到窗体上适当位置 23 窗体上有一个名称为 Command1的命令按钮， 事件过程如下： 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 Ne
10、xt 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 24 有如下程序： Private Sub Form_Click() Dim i As Integer， n As Integer For i 1 To 20 i i 4 n n i If i10 Then Exit For Next Print n End Sub 程序运行后，单击窗体，则输出结果是 ( )。 （ A） 14 （ B）
11、 15 （ C） 29 （ D） 30 25 窗体上有 1个名称为 Command1的命令按钮，事件过程如下： Private Sub Command1_Click() Dim num As Integer， x As Integer num Val(InputBox(“请输入一个正整数 “) Select Case num Case Is100 x x num Case Is0 Then Print Mid(num， p 1) Else Print “END“ End If End Sub 运行程序，单击窗体，根据提示输入一个数值。如果输入的不是实数，则程序输出“END“；否则 ( )。 （
12、 A）用字符方式输出该实数 （ B）输出该实数的 整数部分 （ C）输出该实数的小数部分 （ D）去掉实数中的小数点，保留所有数码输出 28 在窗体上画一个文本框，名称为 Text1，然后编写如下程序： Private Sub Form_Load() Show Text1.Text “ Text1.SetFocus End Sub Private Sub Form_Click() Dim a As String， s As String a Text1.Text s “ For k 1 To Len(a) s UCase(Mid(a， k， 1) s Next k Text1.Text s E
13、nd Sub 程序运行后，在文本框中输入一个字符串，然后单击窗体，则文本框中的内容( )。 （ A）与原字符串相同 （ B）与原字符串中字符顺序相同，但所有字母均转换为大写 （ C）为原字符串的逆序字符串，且所有字母转换为大写 （ D）为原字符串的逆序字符串 29 有以下通用过程： Function fun(N As Integer) s 0 For k 1 To N s s k *(k 1) Next k fun s End Function 该过程的功能是 ( )。 （ A）计算 N！ （ B）计算 1 2 3 . N （ C）计算 12233. NN （ D）计算 12 23 34 .
14、N(N 1) 30 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$ InputBox(“请输入一个二进制数 “) n Len(a$) For i 1 To n Dec Dec * 2 _(a$， i， 1) Next i Print Dec End Sub 程序功能为：单击命令按钮，将产生一个输入对话框，此时如果在对话框中输入一个二进制数，并单击 “确定 “按钮，则把该二进制数转换为等值的十进制数。这个程序不完整，应在 “ _“处填入的内容是 ( )。 （ A） Left （ B） Right （ C） Val （ D） Mid
15、31 设有如下事件过程： Private Sub Form_Click() Sum 0 For k 1 To 3 If k10不成立， i加 1转入下次循环。 i 6时， i i 4 6 4 10， n n i 5 10 15，此时， i 10， i10不成立， i加 1转入下次循环。 i 11时， i i 4 11 4 15， n n i 15 15 30，此时， i 15， i10成立，退出循环。此时 n 30。 25 【正确答案】 B 【试题解析】 按钮事件中变量 x为过程局部变量，第 1次输入 100时， Select语句执行 Case Else分支 x x*num 0*100=0。第
16、二次输入 90时， Select语句执行Case Else分支 x x*num 0*90=0。第三次输入 60时 Select语句执行 Case Is0即说明找到了小数点，是实数 )就输入该实数的小数部分，否则输出 “END“。因此选项 C正确。 28 【正确答案】 C 【试题解析】 程序中 Mid 函数从输入字符串左边开始逐一取一个字符转换为大写，并连接到上次取出的字符的前面，因此文本框中显示的将是原输入 字符串转换为大写的并倒序排列的字符串。所以 C正确。 29 【正确答案】 D 【试题解析】 由程序可知 s 1*(1+1)+2*(2+1)+3*(3+1)+4*(4+1).+N*(N+1),因此选项 D正确。 30 【正确答案】 D 【试题解析】 将二进制数转换为十进制数需要将二进制数的每一位取出来进行运算，从一个数值字符串中截取一位数字字符要使用 Mid函数，因此在程序空缺处该填入 Mid。 31 【正确答案】 B 【试题解析】 程序执行过程如下： k 1， k= 0 And b = 500 And b = 1000 And b = 1500 And b = 2000 Then m = 0.3 * b * 0.9 End If Text2 = Int(m) End Sub 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。
