2013计算机二级VB真考 选择题 题库(11)

2013计算机二级VB真考 选择 题库(11) 2013计算机二级VB真考 选择题 题库(11) 1.算法一般都可以用哪几种控制结构组合而成( B )。 A) 选择、分支、递归 B) 顺序、循环、选择 C) 循环、递归、选择 D) 顺序、选择、嵌套 2. 用链表表示线性表的优点是( C )。 A) 花费的存储空间较顺序存储少 B) 没有明显优势 C) 便于插入和删除操作 D) 便于随机存取操作 3.在下列几种排序中，要求内存量最大的是( C )。 A) 冒泡排序 B) 插入排序和选择排序 C) 归并排序 D) 快速排序 4.下面不属于软件工程的3要素的是(A )。A) 需求 B) 需求 C) 工具 D) 过程 5.下列不属于结构化的常用工具的是( B )。 A) 数据流图 B) 流程图 C) 数据字典 D) 判定树和判定表 6.在软件工程中，白箱测试法可用于测试程序的内部结构。此方法将程序看做是( A )。 A) 路径的集合 B) 选择的集合 C) 操作的集合 D) 目标的集合 、7.在数据管理技术发展过程中，文件系统与数据库系统的主要区别是数据库系统具有 ( C )。 A) 数据较低的冗余度 B) 数据共享度高 C) 特定的数据模型 D) 专门的数据管理软件 8.下列说法中，不属于数据模型所描述的的是( D )。 A) 数据结构 B) 数据操作 C) 数据约束 D) 数据管理 9.用二维表的形式表示实体和实体间联系的数据模型( A )。 A) 关系模型 B) 层次模型 C) 网状模型 D) 数据模型 10.在数据库设计中，将E-R图转换成关系数据模型的过程属于( C )。 A) 需求分析阶段 B) 概念设计阶段 C) 逻辑设计阶段 D) 物理设计阶段 11.以下合法的VB变量名是( D )。 A) _x B) 2y C) a#b D) x_1_x 12.以下关于VB特点的叙述中，错误的是( C )。 A) VB中一个对象可有多个事件过程 B) VB应用程序能以编译方式运行 C) VB应用程序从Form_Load事件过程开始执行 D) 在VB应用程序中往往通过引发某个事件导致对对象的操作 13.有如下语句序列: Dim a， b As Integer Print a Print b 执行以上语句序列，下列叙述中错误的是( A )。 A) 输出的a值是0 B) 输出的b值是0 C) a是变体类型变量 D) b是整型变量 14.以下关于控件数组的叙述中，错误的是( C )。 A) 各数组元素共用相同的事件过程 B) 各数组元素通过下标进行区别 C) 数组可以由不同类型的控件构成 D) 各数组元素具有相同的名称 15.以下关于VB文件的叙述中，正确的是( B )。 A) 模块文件的扩展名是.frm B) VB应用程序可以被编译为.exe文件 C) 一个工程文件只能含有一个标准模块文件 D) 类模块文件的扩展名为.bas 16.以下自定义数据类型的语句中，正确的是(B )。 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 ID As String 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(13 / 5)的值是( A )。 A) 5 B) 6 C) 7 D) 9 18.在程序中要使用Array函数给数组arr赋初值，则以下数组变量定义语句中错误的是 ( B)。 A) Static arr B) Dim arr(5) C) Dim arr() D) Dim arr As Variant 19.以下关于变量作用域的叙述中错误的是( C )。 A) 在窗体模块的声明部分声明的Private变量，其作用域是窗体内的所有过程 B) 在标准模块的声明部分声明的Private变量，其作用域是模块内的所有过程 C) 在窗体模块的声明部分声明的Pubilc变量，其作用域是本窗体的所有过程 D) 在标准模块的声明部分声明的Pubilc变量，其作用域是应用程序的所有过程 20.下面关于文件叙述中错误的是( D )。 A) VB数据文件需要先打开，再进行处理 B) 随机文件每个记录的长度是固定的 C) 不论是顺序文件还是随机文件，都是数据文件 D) 顺序文件的记录是顺序存放的，可以按记录号直接访问某个记录 21.若要使文本框能够输入多行文本，应该设置的属性是( A )。 A) MultiLine B) WordWrap C) ScrollBars D) AutoSize 22.以下关于命令按钮的叙述中正确的是( A )。 A) 命令按钮上可以显示图片 B) 命令按钮能够分别响应单击、双击事件 C) 程序运行时，不能改变命令按钮上的文字 D) 若命令按钮的Cancel属性设为True，焦点在其他控件上时，按下回车键与单击该按钮的 效果相同 23.窗体上有一个名称为VScroll1的垂直滚动条，要求程序运行时，滚动块的初始位置在最下 端，应该使VScroll1.Value的值等于( C )。 A) VScroll1.LargeChange B) VScroll1.SmallChange C) VScroll1.Max D) VScroll1.Min 24.设窗体名称为frm1。以下叙述中正确的是( D )。 A) 运行程序时，能够加载窗体的事件过程是frm1_Load B) 运行程序时，能够加载窗体的事件过程是Form1_Load C) 程序运行中用语句:frm1.Name,"New" 可以更改窗体名称 D) 程序运行中用语句:frm1.Caption,"新标题" 可以改变窗体的标题 25.设运行程序时弹出的菜单如图所示.关于该菜单，以下叙述中错误的是( B )。 A) 菜单中能够显示分隔线是因为该菜单项的标题为"," B) 分隔线对应的菜单项的Name属性可以为空 C) "退出"菜单项的有效性属性被设为False D) 使用PopupMenu方法能够显示如图所示的菜单 26.窗体上有一个列表框控件List1。以下叙述中错误的是( A )。 A) List1中有ListCount,1个列表项 B) 当List1.Selected(i),True，表明第i项被选中 C) 设置某些属性，可以使列表框显示多列数据 D) List1.Text的值是最后一次被选中的列表项文本 27.以下关于单选按钮和复选框的叙述中，正确的是( D )。 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 Sub 关于以上定义，以下叙述中错误的是( D )。 A) 根据Shift参数，能够确定使用转换键的情况 B) 根据X、Y参数可以确定触发此事件时鼠标的位置 C) Button 参数的值是在MouseUp事件发生时，系统自动产生的 D) MouseUp是鼠标向上移动时触发的事件 29.窗体上有一个名称为CD1的通用对话框，一个名称为Command1的命令按钮，相应的事件 过程如下: Private Sub Command1_Click() CD1.Filter,"All File|*.*|Text File|*.txt|Word|*.Doc" CD1.FilterIndex,2 CD1.FileName,"E:\Test.ppt" CD1.InitDir,"E:" CD1.ShowOpen End Sub 关于上述程序，以下叙述中正确的是( B )。 A) 初始过滤器为"*.*" B) 指定的初始目录为"E:\" C) 以上程序代码实现打开文件的操作 D) 由于指定文件类型是.ppt，所以导致打开文件的操作失败 30.编写如下程序: Private Sub Command1_Click() Dim i As Integer， j As Integer n,InputBox("输入一个大于1的正整数") For i,2 To n For j,2 To Sqr(i) If i Mod j,0 Then Exit For Next j If j>Sqr(i)Then Print i Next i End Sub 该程序的功能是( D )。 A) 判断n是否为素数 B) 输出n以内所有的奇数 C) 输出n以内所有的偶数 D) 输出n以内所有的素数 31.以下程序的功能是随机产生10个两位的整数: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer Dim i As Integer Randomize For i,1 To 10 a(i),Int(Rnd * 100)，1 Print a(i) Next i End Sub 运行以上程序，发现有错误，需要对产生随机数的语句进行修改。以下正确的修改是( B )。 A) a(i),Int(Rnd * 100) B) a(i),Int(Rnd * 90)，10 C) a(i),Int(Rnd * 100)，10 D) a(i),Int(Rnd * 101) 32.在窗体上画一个名称为Command1的命令按钮，编写如下事件过程: Private Sub Command1_Click() n,0 For i,0 To 10 X,2 * i,1 If X Mod 3,0 Then n,n，1 Next i Print n End Sub 运行程序，单击命令按钮，则窗体上显示的是( B )。 A) 1 B) 3 C) 5 D) 7 33.窗体上有名称为Command1的命令按钮，名称分别为Label1、Label2、Label3的标签。编 写如下程序: Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n,5 z,z，n y,y，n x,x，y Label1,x Label2,y Label3,z End Sub 运行程序，连续3次单击命令按钮后，3个标签中分别显示的是( D )。 A) 5 5 5 B) 15 10 5 C) 15 15 15 D) 30 15 5 34.命令按钮Command1的事件过程如下: Private Sub Command1_Click() Dim arr(5， 5)As Integer Dim i As Integer， j As Integer For i,1 To 4 2 To 4 For j, arr(i， j),i，j Next j Next i Print arr(1， 3)，arr(3， 4) End Sub 执行上述过程，输出结果是( C )。 A) 6 B) 7 C) 11 D) 12 35.现有程序如下: Option Base 1 Private Sub Form_Click() y(5)As Integer Dim x(5， 6)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 i End Sub Sub f(m As Integer， n As Integer， a()As Integer， b()As Integer) For i,1 To m b(i),0 For j,1 To n b(i),b(i)，a(i， j) Next j Next i End Sub 关于上述程序，以下叙述中正确的是( C )。 A) 调用过程语句有错，参数不匹配 B) 程序有错，数组下标越界 C) y数组中保存的是x数组每行数据之和 D) x数组中数据的取值范围是1,10 36.窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器，其Enabled和Interval属 性分别为True和1000。编写如下程序: Dim n As Integer Private Sub Timer1_Timer() ch,Chr(n，Asc("A")) Label1.Caption,ch n,n，1 n,n Mod 4 End Sub 运行程序，将在标签中( A )。 A) 不停地依次显示字符"A"、"B"、"C"、"D"，直至窗体被关闭 B) 依次显示字符"A"、"B"、"C"、"D"各一次 C) 每隔1秒显示字符"A"一次 D) 每隔1秒依次显示26个英文字母中的一个 37.窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x,Val(InputBox("输入数据")) Text1,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 )。 A) 语句 fun,n 有错，因为n是整型，fun没有定义类型 B) 运行程序，输入值为5时，文本框中显示655 C) 运行程序，输入值为6时，文本框中显示42 D) ByRef表示参数按址传递 38.设工程文件中包名称分别为Form1、Form2的两个窗体，且Form1的菜单属性设置如下: 窗体Form1中的程序如下: Dim Flag As Boolean Private Sub Form_Load() Flag,True End Sub Private Sub mnu1_Click(index As Integer) If Index,1 Then If Flag,True Then Form2.show mnu1(1).Caption,"隐藏窗体2" Flag,False Else Form2.Hide mnu1(1).Caption,"显示窗体2" Flag,True End If End If If Index,2 Then End End Sub 关于上述程序，以下叙述中错误的是( D )。 A) Index属性的值可以用来区分控件数组元素 B) Index为1的菜单项的标题可能会改变 C) 两个名称均为Mnu1的菜单项构成一个控件数组 D) 语句Form2.Hide将Form2卸载 39.有如下程序: Private Sub Command1_Click() Dim i As Integer， j As Integer Dim sum As Integer n,1 Do j,1 Do sum,sum，j j,j，1 Print j; Loop Until j>3 n,n，2 Loop Until n>10 Print sum End Sub 运行上述程序，外层Do循环执行的次数为( B )。 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,UBound(a) Max,a(s) For i,s To f If a(i)>Max Then Max,a(i) Next End Sub 以下关于上述过程的叙述中，错误的是( C )。 A) 语句Call FindMax(a，m)可以调用该过程，其中的a是数组，m是Integer类型变量 B) For循环次数等于a数组的元素数 C) 过程末尾应该增加一条返回最大值的语句FindMax,Max D) 参数Max用于存放找到的最大值