[计算机类试卷]国家二级(VB)机试模拟试卷18及答案与解析.doc
《[计算机类试卷]国家二级(VB)机试模拟试卷18及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级(VB)机试模拟试卷18及答案与解析.doc(31页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级( VB)机试模拟试卷 18及答案与解析 一、选择题 1 算法一般都可以用哪几种控制结构组合而成 ( )。 ( A)选择、分支、递归 ( B)顺序、循环、选择 ( C)循环、递归、选择 ( D)顺序、选择、嵌套 2 用链表表示线性表的优点是 ( )。 ( A)花费的存储空间较顺序存储少 ( B)没有明显优势 ( C)便于插入和删除操作 ( D)便于随机存取操作 3 在下列几种排序方法中,要求内存量最大的是 ( )。 ( A)冒泡排序 ( B)插入排序和选择排序 ( C)归 并排序 ( D)快速排序 4 下面不属于软件工程 j三要素的是 ( )。 ( A)需求 ( B)方法 ( C)工具
2、 ( D)过程 5 下列不属于结构化分析的常用工具的是 ( )。 ( A)数据流图 ( B)流程图 ( C)数据字典 ( D)判定树和判定表 6 在软件工程中,白箱测试法可用于测试程序的内部结构。此方法将程序看做是( )。 ( A)路径的集合 ( B)选择的集合 ( C)操作的集合 ( D)目标的集合 7 在数据管理技术发展过程中,文件系统与数据库系统的主要区别 是数据库系统具有 ( )。 ( A)数据较低的冗余度 ( B)数据共享度高 ( C)特定的数据模型 ( D)专门的数据管理软件 8 下列说法中,不属于数据模型所描述的内容的是 ( )。 ( A)数据结构 ( B)数据操作 ( C)数据
3、约束 ( D)数据管理 9 用二维表的形式表示实体和实体间联系的数据模型是 ( )。 ( A)关系模型 ( B)层次模型 ( C)网状模犁 ( D)数据模型 10 在数据库设计中,将 E-R图转换成关系数据模型的过程属于 ( )。 ( A)需求 分析阶段 ( B)概念设计阶段 ( C)逻辑设计阶段 ( D)物理设计阶段 11 以下合法的 VB变量名是 ( )。 ( A) _x ( B) 2y ( C) a#b ( D) x 1 x 12 以下关于 VB特点的叙述中,错误的是 ( )。 ( A) VB中一个对象可有多个事件过程 ( B) VB应用程序能以编译方式运行 ( C) VB应用程序从 F
4、orm Load事件过程开始执行 ( D)在 VB应用程序中往往通过引发某个事件导致对对象的操作 13 有如下语句序列: Dim a, b As Integer Print a Print b 执行以上语句序列,下列叙述中错误的是 ( )。 ( A)输出的 a值是 0 ( B)输出的 b值是 0 ( C) a是变体类型变量 ( D) b是整型变量 14 以下关于控件数组的叙述中,错误的是 ( )。 ( A)各数组元素共用相同的事件过程 ( B)各数组元索通过下标进行区别 ( C)数组可以由不同类型的控件构成 ( D)符数组元素具有相同的名称 15 以下关于 VB文件的叙述中,正确的是 ( )。
5、 ( A)标准模块文件的扩展 名是 frm ( B) VB应用程序可以被编译为 exe文件 ( C)一个工程文件只能含有 -个标准模块文件 ( D)类模块文件的扩展名为 bas 16 以下自定义数据类型的语句中,正确的是 ( )。 ( A) Type student ID As String*20 name As String*10 age As Integer End student ( B) Type student ID As String*20 name As String*10 age As Integer End Type ( C) Type student lD As Strin
6、g name As String age As Integer End student ( D) Type ID As String*20 name As String*10 age As Integer End Type student 17 设: a=12, b=5, c=7,表达式 x=(a c+a Mod b)+Int(1 3 5)的值是 ( )。 ( A) 5 ( B) 6 ( C) 7 ( D) 9 18 在程序中要使用 Array函数给数组 arr赋初值,则以下数组变鞋定义语句中错误的是 ( )。 ( A) Static arr ( B) Dim arr(5) ( C) Dim
7、arr() ( D) Dim arr As Variant 19 以下关于变量作用域的叙述中错误的是 ( )。 ( A)在窗体模块的声叫部分声明的 Private变量,其作用域是窗体内的所有过程 ( B)在标准模块的声明部分声明的 Private变量,其作用域是模块内的所有过程 ( C)在窗体模块的声明部分声明的 Pubilc变量,其作用域是本窗体的所有过程 ( D)在标准模块的声叫部分声明的 Pubilc变量,其作用域是应用程序的所有过程 20 下面关于文件叙述中错误的是 ( )。 ( A) VB数据文件需要先打开,再进行处理 ( B)随机文件每个记录的长度是同定的 ( C)小论是顺序文件还
8、是随机文件,都是数据文件 ( D)顺序文件的记录是顺序存放的,可以按记录号直接访问某个记录 21 符要使文 本框能够输入多行文本,应该设置的属性是 ( )。 ( A) MultiIine ( B) WordWrap ( C) ScrolIBars ( D) AutoSize 22 以下关于命令按钮的叙述中正确的是 ( )。 ( A)命令按钮上可以显示图片 ( B)命令按钮能够分别响应单击、双击事件 ( C)程序运行时,不能改变命令按钮上的文字 ( D)若命令按钮的 Cancel属性设为 True,焦点在其他控件上时,按下回车键与单击该按钮的效果相同 23 窗体上有一个名称为 VScrolll的
9、垂直滚动条,要 求程序运行时,滚动块的初始位置在最下端,应该使 VScrolll Value的值等于 ( )。 ( A) VScroll1 LargeChange ( B) VScroll1 SmalICange ( C) VScrolll Max ( D) VScrolll Min 24 设窗体名称为 frml。以下叙述中正确的是 ( )。 ( A)运行程序时,能够加载窗体的事件过程是 frml_Load ( B)运行程序时,能够加载窗体的事件过程是 Forml_Load ( C)程序运行中用语句: frml Name=“New”可以更改窗体名称 ( D)程序运行中朋语句: frm1 cap
10、tion “新标题 ”可以改变窗体的标题 25 设运行程序时弹出的菜单如图所示关于该菜单,以下叙述中错误的是 ( )。( A)菜单中能够显示分隔线是因为该菜单项的标题为 “ ” ( B)分隔线对应的菜单项的 Name属性可以为空 ( C) “退出 ”菜单项的有效性属性被设为: False ( D)使用 PoptlpMenu方法能够显示如图所示的菜单 26 窗体上有一个列表框控件 Listl。以下叙述中错误的是 ( )。 ( A) Listl中有 ListCount 1个列表项 ( B)当 Listl Selected(i)=True,表明第 i项被选中 ( C)设置某些属性,可以使列表框显示多
11、列数据 ( D) Listl Text的值是最后一次被选中的列表项文本 27 以下关于单选按钮和复选框的叙述中,正确的是 ( )。 ( A)单选按钮和复选框都能从多个选项中选择一项 ( B)单选按钮和复选框被选中时,选中控件的 Value属性值为 True ( C)是否使用框架控件将单选按钮分组,对选项没有影响 ( D)是否使用框架控什将复选框分组,对选项 没有影响 28 窗体的 Mouseup事件过程如下: Private Sub Form MouseUp(Button As Integer, Shift As: Integer, X As Single,Y As Single) End S
12、ub 关于以上定义,以下叙述中错误的是 ( )。 ( A)根据 shift参数,能够确定使用转换键的情况 ( B)根据 x、 Y参数可以确定触发此事件时鼠标的位置 ( C) Button参数的值是在 MouseUp事件发生时,系统自动产生的 ( D) MouselJp是鼠标向上移动时触发的事件 29 窗体上有一个名称为 CDl的通用对话框,一个名称为 Commandl的命令按钮,相应的事件过程如下: Private Sub Commandl Click () CDI Fiher=“AII Filel* * Text File * txtl Word * Doc” CDl Filterlndex
13、=2 CDI FileName=“E: Test ppt” CDl InitDir=“E: Test ppt” CDl ShowOpen End Sub 关于上述程序,以下叙述中正确的是 ( )。 ( A)初始过滤器为 “* *” ( B)指定的初始目录为 “E: ” ( C)以上程序代码实现打开文件的操作 ( D)由于指定文什类型是 ppt,所以导致打开文件的操作失败 30 编写如下程序: Private Sub Commandl Click() Dim i As Integer, j As Integer n=InputBox(“输入一个大于 1的正整数 ”) For i=2 To n F
14、or j=2 To Sqr(i) If i Mod i=0 Then Exit For Next j If jSqr(i)Then Print I Next I End Sub 该程序的功能是 ( )。 ( A)判断 n是否为素数 ( B)输出 n以内所有的奇数 ( C)输出 n以内所有的偶数 ( D)输出 n以内所有的素数 31 以下程序的功能是随机产生 10个两位的整数: Option Base 1 Private Sub Commandl Click() Dim a(10)As Integer Dim i As Integez Randomize For i=l To 10 a(i)=i
15、nt(Rnd*100)+1 Print a(i) Next I End Sub 运行以上程序,发现有错误,需要对产生随机数的语句进行修改。以下修改正确的是 ( )。 ( A) a(i)=Int(Rnd*100) ( B) a(i)=Int(Rnd*90)+10 ( C) a(i)=hat(Rnd*100)+10 ( D) a(i)=Int(Rnd*101) 32 在窗体上画一个名称为 Commandl的命令按钮,编写如下事件过程: Private Sub Commandl Click() n=0 For i=0 To 10 X=2*i-l Tf X Mod 3=0 Then n=n+1 Nex
16、t 1 Print n End Sub 运行程序,单击命令按钮,则窗体上显示的是 ( )。 ( A) l ( B) 3 ( C) 5 ( D) 7 33 窗体上有名称为 Commandl的命令按钮,名称分别为 Labell、 Label2、 Label3的标签。编写如下程序: Private X As Integer Private Sub Commandl Click() Static Y As Integer Dim z As Integer n=5 Z=Z+n Y Y+n x=x+Y Labe11=X Label2=Y Label3=Z End Sub 运行程序,连续 3次单击命令按钮后
17、, 3个标签中分别显示的是 ( )。 ( A) 5 5 5 ( B) 15 10 5 ( C) 15 15 15 ( D) 30 15 5 34 命令按钮 Commandl的事件过程如下: Private Sub Commandl_Click() Dim arr(5, 5)As Integer Dim i As Integer, j As Integer For i=1 To 4 Forj=2 To 4 arr(i, j)=i+j Next j Next I Print arr(1, 3)+arr(3, 4) End Sub 执行上述过程,输 出结果是 ( )。 ( A) 6 ( B) 17
18、( C) 11 ( D) 12 35 现有程序如下: Option Base l Prirate Sub Form Click() Dim x(5, 6)As Integer, y(5)As Integer For i=1 To 5 For j=1 To 6 x(i, j)=Int(Rnd*9+1) Next j Next I Call f(5, 6, x, Y) For i=1 To 5 Print Y(i); Next 1 End Sub Sub f(m As Integer, n As Integer, a()As Integer, b()As Integer) For i=l To m
19、 b(i)=0 For j=1 To n b(i)=b(i)+a(i, j) Next i Next i End Sub 关于上述程序,以下叙述中正确的 是 ( )。 ( A)调用过程语句有错,参数不匹配 ( B)程序有错,数组下标越界 ( C) y数组中保存的是 x数组每行数据之和 ( D) X数组中数据的取值范围是 1-10 36 窗体上有一个名称为 Labell的标签、一个名称为 Timerl的计时器,其 Enabled和 Interval属性分别为 True和 1000。编写如下程序: Dim n As Integer Private Sub Timerl_Timer() ch=Chr
20、(n+Asc(“A”) Labell Caption ch n=n+1 n=n Mod 4 End Sub 运行程序,将在标签中( ) ( A)不停地依次显示字符 “A”、 “B”、 “C”、 “D”,直至窗体被关闭 ( B)依次显示字符 “A”、 “B”、 “C”、 “D”各一次 ( C)每隔 1秒显示字符 “A”一次 ( D)每隔 1秒依次显示 26个英文字母中的一个 37 窗体上有一个名称为 Commandl的命令按钮,一个名称为 Textl的文本框。编写如下程序: Private Sub Commandl Click() Dim X As Integer x=Val(InputBox(
21、“输入数据 ”) Textl=Str(x+fun(X)+fun(X) End Sub Private Function fun(ByRef n As Integer) If n Mod 3=0 Then n n+n Else n n*n End If fun=n End Function 对于上述程序,以下叙述中错误 的是 ( )。 ( A)语句 fun=n有错,因为 n是整型, fun没有定义类型 ( B)运行程序,输入值为 5时,文本框中显示 655 ( C)运行程序 ,输入值为 6时,文本框中显示 42 ( D) ByRef表示参数按址传递 38 设工程文件中包名称分别为 Forml、
22、Form2的两个窗体,且 Forml的菜单属性设置如下: 窗体 FormI 中的程序如下: Dim Flag As Boolean Private Sub Form Load() Flag=True End Sub Private Sub nlnul Click(index As Integer) If Index=1 Then If Flag=True Then Form2 show mnul(1) Caption=“隐藏窗体 2” Flag=False Else Form2 Hide mnul(1) Caption=“显示窗体 2” Flag=True End If End If If I
23、ndex=2 Then End End Sub 关于上述程序,以下叙述中错误的是 ( )。 ( A) Index属性的值可以用来区分控件数组元素 ( B) Index为 l的菜单项的标题可能会改变 ( C)两个名称均为 Mnul的菜单项构成一个控件数组 ( D)语句 Form2 Hide将 Form2卸载 39 有如下程序: Private Sub Commandl Click() Dim i As Integer, j As Integer Dim Sum As Integer n=l Do j 1 Do sum=sum+j j=j+1 Print j; Loop Until j3 n=n+
24、2 Loop Until n10 Print sum End Sub 运行上述程序,外层 Do循环执行的次数为 ( )。 ( A) 4 ( B) 5 ( C) 7 ( D) 10 40 以下过程的功能是从数组中寻找最大值: Private Sub FindMax(a()As Integer, ByRef Max As Integer) Dim s As Integer f As Integer Dim i As Integer s=LBound(a) f=UBotlnd(a) Max=a(s) For i=s To f If a(i)MaxThen Max=a(i) Next End Sub
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 模拟 18 答案 解析 DOC
