《二级Visual+Basic语言程序设计模拟152》由会员分享，可在线阅读，更多相关《二级Visual+Basic语言程序设计模拟152（18页珍藏版）》请在金锄头文库上搜索。
1、 模拟 二级 Visual Basic 语言程序设计模拟 152单项选择题第 1 题：在窗体上面一个命令按钮，名称为 Command，1 然后编写如下代码：Option Base 0Private Sub Comma nd1 Click()Dim A1(4)As Integer ，A2(4)As IntegerFor k ：0 T0 2A1(k+1)=InputBox( “请输入一个整数” )A2(3 一 k)=A1(k+1)Next kPrint A2(k)End Sub程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为 ( ) 。A. 0B. 1C. 2D. 3参考答
2、案： C程序运行过程如下：k=0,输入 2，A1(k+1)=A1(0+1)=A1(1)=2，A2(3 k)=A2(3 0)=A2(3)=2k)=A2(31)=A2(2)=4k)=A2(32)=A2(1)=6 即 2。第 2 题：k=1，输入 4, A1(k+1)=A1(1+1)=A1(2)=4 , A2(3 k=2，输入 6, A1(k+1)=A1(2+1)=A1(3)=6 , A2(3 k=3， For 循环结束，输出 A2(k) 的值即 A2(3) 的值，用链表表示线性表的优点是 。A. 花费的存储空间较顺序存储少B. 没有明显优势C. 便于插入和删除操作D. 便于随机存取操作 参考答案：
3、 C链式存储结构克服了顺序存储结构的缺点：它的结点空间可以动态申请和释放； 它的数据元素的逻辑次序靠结点的指针来指示， 不需要移动数据元素。 故链式存 储结构下的线性表便于插入和删除操作。本题答案为C。第 3 题：设窗体上有2个文本框Text1和Text2，并有下面的事件过程：Dim nPrivate Sub Text1 KeyPress(KeyAscii As Integer)If “ A = Chr(KeyAscii)And Chr(KeyAscii) = “ Z” Thenn=n+1End IfIf KeyAscii=13 ThenText2 Text = nEnd IfEnd Sub程
4、序运行时，在文本框 Text1 中输入“ VisuaI Basic 6 0”并按回车键 后，在文本框 Text2 中显示的是 () 。A. 2B. 9C. 13D. 16 参考答案： AKeyPress事件的参数KeyAscii为所按键的ASCII码，Chr函数把这个ASCii码 转换为对应的字符，回车键的 ASCii 码值是 13。程序中 KeyPress 过程的功能是 统计Text1文本框中输入的字符串中 Az之间字母的个数，按回车键后把个数 值显示在 Text2 文本框中。存 Text1 义本框中输入“ VisuaI Basic 60”，其中 A z 的字母有 2 个，按回车键后， Te
5、xt 文本框将会显示 2。第 4 题：窗体上有一个名称为 Option1 的单选按钮数组，程序运行时，当单击某个单选 按钮时，会调用下面的事件过程Private Sub Option1_CIick(Index As Integer)End Sub下面关于此过程的参数 Index 的叙述中，正确的是( )A. Index 为 1 表示单选按钮被选中，为 0 表示未选中B. Index 的值可正可负C. Index 的值用来区分哪个单选按钮被选中D. Index 表示数组中单选按钮的数量参考答案： CIndex 参数值返回的是单选按钮数组中各单选按钮的索引值， 用它来区分各单选 按钮。因此A)、D
6、)选项错误，C)选项正确；Index的值只能是非负数，因此 B)选项错误。第 5 题： 在窗体上画一个名称为 Text1 的文本框，然后编写如下事件过程：Private Sub Text1_KeyPress(KeyAscii As Integer)End Sub假定焦点位于文本框中，则以下能触发 KeyPress 事件的操作是A. 在窗体上单击鼠标B. 双击文本框C. 用鼠标滑过文本框D .按下键盘上的某个键 参考答案： DKeyPress 事件，当用户按下和松开一个键时所触发的事件，该事件将返回所按 键的 ASCII 码值，故 D 选项正确。第 6 题： 编写如下程序：Private Sub
7、 Command1_Click()Dim m As Integer ， n As Integern = 2For m = 1 To 3Print proc(n) ；Next mEnd SubFunction proc(i As Integer)Dim a As IntegerStatic b As Integera = a+ 1b= b+ 1proc = a * b + iEnd Function 程序运行后，单击命令按钮 Command，1 输出结果为 。A. 33 3B. 3 4 5C. 3 5 6D. 12 3参考答案： B第 7 题： 编写如下程序：Private Sub Comman
8、d1_Click()Dim i As Integer, num As IntegerDim arr(10) As IntegerFor i = 0 To 10arr(i) = iNextDonum = num + arr(10 - i)i = i - 1Loop Un til i = 5Print numEnd Sub 程序运行后，单击命令按钮 Command，1 输出结果为 A. 0B. 1C. 10D. 程序出错 参考答案： D定义数组 arr(10) ，并利用 For 循环对其赋值 arr(10)=0,1,2，.,9,10 。在Do循环中，意在对数组arr(1O)中的部分元素值求和。题目
9、中的程序 Do语句缺 少对i的赋值，故程序出错。所以选择 D项。第 8 题：下列叙述中错误的是( )。A. 在数据库系统中，数据的物理结构必须与逻辑结构一致B. 数据库技术的根本目标是要解决数据的共享问题C. 数据库设计是指在已有数据库管理系统的基础上建立数据库D. 数据库系统需要操作系统的支持参考答案： A数据库应用系统中的核心问题是设计一个能满足用户需求、性能良好的数据库，这就是数据库设计，因此本题答案为A)。第 9 题：现有如下一段程序：x = UCase(lnputBox(输入：)Select Case xCase A To CPrint 考核通过！ Case DPrint 考核不通过
10、 ！Case ElsePrint 输入数据不合法！ End SelectEnd Sub执行程序，在输入框中输入字母 B ，则以下叙述中正确的是 。A. 程序运行错B. 在窗体上显示考核通过！C. 在窗体上显示考核不通过！D. 在窗体上显示输入数据不合法！参考答案： B程序中Ucase函数将输入的字母转换为大写，然后通过 Select多分支控制语句 选择输出不同信息，当输入字母在A到C之间时，显示考核通过！，输入的 是D时显示考核不通过！，如果输入的是A到D之外的其他字符则显示输 入数据不合法！ 。程序中输入字母 B ，因此会显示 考核通过！ 。第 1O 题：设有如下事件过程：Private S
11、ub Command1_Click() Dim aa = Array(3,5,6,3,2,6,5,3,5,4,3,9,4,5,6,3,5) x = 0n = UBound(a) For i = 0 To n m = 0 For j = 0 To n If a(i) = a(j) Then m = m + 1 End If Next jIf m x Then x = m: b = a(i)Next iPrint b End Sub 运行程序，输出是( )。A. 2B. 3C. 5D. 9 参考答案： B本题程序中内层 For 循环统计具有相同值元素的个数， 外层循环的功能则是对数 组中的所有元素
12、进行统计，找出第 1 个具有相同值的元素个数最多的那个元素 值。数组中元素值为 3的元素有 5个，元素值为 5 的元素有 5 个，元素值为 6 的 元素为 3 个，元素值为 2的元素有 1个，元素值为 4 的元素有 2 个，元素值为 9 的元素有1个。因此第1个具有相同元素值的最多个数的元素值是3, B）选项正确。第 11 题：设用复制、粘贴的方法建立了一个命令按钮数组Command，1 以下对该数组说法错误的是（ ）。A. 命令按钮的所有Caption属性都是Command1B. 在代码中访问任意一个命令按钮只需使用名称 Command1C. 命令按钮的大小都相同D. 命令按钮共享相同的事件
13、过程参考答案： B在访问数组控件时，除了要使用控件的名称外，还需要使用控件下标（即 Index 属性）来区别数组控件中的具体控件。第 12 题： 关系表中的每一横行称为一个 （） 。A. 字段B. 元组C. 行D. 码 参考答案： B在关系数据库中，关系模型采用二维表来表示，简称“表”。二维表是由表框架 及表元组组成。在表框架中，按行可以存放数据，每行数据称为元组。本题答案 是 B。第 13 题： 下列关于栈的叙述中正确的是 。A. 在栈中只能插入数据，不能删除数据B. 在栈中只能删除数据，不能插入数据C .栈是先进后出 (FILO) 的线性表D .栈是先进先出 (FIFO) 的线性表 参考答
14、案： C栈是限定在一端进行插入与删除的线性表。 栈是按照 先进后出的或后进先出的 原则组织数据的，因此，栈也被称为“先进后出”表或“后进先出”表。本题答 案是 C。第 14 题： 下列操作中不能向工程添加窗体的是 。A. 执行工程菜单中的添加窗体命令B. 单击工具栏上的 添加窗体 按钮C .右击窗体，在弹出的菜单中选择 添加窗体 命令D. 右击工程资源管理器，在弹出的菜单中选择添加命令，然后在下一级菜 单中选择 添加窗体 命令 参考答案： C右击窗体，弹出的菜单中没有添加窗体命令，故C选项错误。第 15 题： 下面有关标准模块的叙述中，错误的是 () 。A .标准模块的文件扩展名为 basB.
15、 标准模块中的Private过程不能被工程中的其他模块调用C. 标准模块不完全由代码组成，还可以有窗体D. 标准模块中的全局变量可以被工程中的任何模块引用 参考答案： C标准模块是只含有程序代码的应用程序文件，其扩展名为.bas。标准模块是应用程序内其它模块可访问的过程和声明的容器， 它们可以包含变量、常数、类型、 外部过程和全局过程的全局 ( 在整个应用程序范围内有效的 )声明或模块级声明， 它由3部分组成：全局变量声明；模块层声明：通用过程。其中，全局声明放在标准模块的首部， 因为每个模块都可能要求有它自己的惟一名字的全局 变量。全局变量的作用域最大，可以在工程的每个模块、每个过程中使用。在默 认情况下，
