1、2目 录2005年 4月全国计算机等级考试二级 VB笔试试卷 .12005年 4月全国计算机等级考试二级 VB笔试参考答案 .62005年 9月全国计算机等级考试二级 VB笔试试卷 .72005年 9月全国计算机等级考试二级 VB笔试参考答案 .132006年 4月全国 计算机等级考试二级 VB笔试试卷 .142006年 4月全国计算机等级考试二级 VB笔试参考答案 .192006年 9月全国计算机等级考试二级 VB笔试试卷 .202006年 9月全国计算机等级考试二级 VB笔试参考答案 .262007年 4月全国计算机等 级考试二级 VB笔试试卷 .272007年 4月全国计算机等级考试二级
2、 VB笔试参考答案 .332007年 9月全国计算机等级考试二级 VB笔试试卷 .342007年 9月全国计算机等级考试二级 VB笔试参考答案 .412008年 4月全国计算机等级考试二级 VB笔试试卷 .422008年 4月全国计算机等级考试二级 VB笔试参考答案 .502008年 9月全国计算机等级考试二级 VB笔试试卷 .错误！未定义书签。2008年 9月全国计算机等级考试二级 VB笔试参考答案 错误！未定义书签。2005 年 4 月全国计算机等级考试二级VB 笔试真题- 1 -2005 年 4 月全国计算机等级考试二级 VB 笔试试卷一、选择题(1）(35 ）每小题 2 分，共 70
3、分） (1）数据的存储结构是指A） 存储在外存中的数据 B） 数据所占的存储空间量C） 数据在计算机中的顺序存储方式 D） 数据的逻辑结构在计算机中的表示(2）下列关于栈的描述中错误的是A）栈是先进后出的线性表 B） 栈只能顺序存储C） 栈具有记忆作用 D） 对栈的插入与删除操作中，不需要改变栈底指针(3）对于长度为 n 的线性表，在最坏情况下，下列各排序法所对应的比较次数中正确的是A） 冒泡排序为 n/2 B） 冒泡排序为 n C） 快速排序为 n D） 快速排序为 n(n-1）/2(4）对于长度为 n 的线性表进行顺序查找，在最坏情况下所需要的比较次数为A） log2n B） n/2 C）
4、 n D） n+1(5）下列对于线性链表的描述中正确的是A）存储空间不一定是连续，且各元素的存储顺序是任意的B）存储空间不一定是连续，且前件元素一定存储在后件元素的前面C）存储空间必须连续，且前件元素一定存储在后件元素的前面D）存储空间必须连续，且各元素的存储顺序是任意的(6）下列对于软件测试的描述中正确的是A）软件测试的目的是证明程序是否正确 B）软件测试的目的是使程序运行结果正确C）软件测试的目的是尽可能多地发现程序中的错误 D）软件测试的目的是使程序符合结构化原则(7）为了使模块尽可能独立，要求A）模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强B）模块的内聚程度要尽量高，且各模块间
5、的耦合程度要尽量弱C）模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱 D）模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强(8）下列描述中正确的是A） 程序就是软件B） 软件开发不受计算机系统的限制C） 软件既是逻辑实体，又是物理实体D） 软件是程序、数据与相关文档的集合(9）数据独立性是数据库技术的重要特点之一。所谓数据独立性是指A） 数据与程序独立存放B） 不同的数据被存放在不同的文件中C） 不同的数据只能被对应的应用程序所使用D） 以上三种说法都不对(10） 用树形结构表示实体之间联系的模型是A） 关系模型 B） 网状模型 C） 层次模型 D） 以上三个都是(11） 在窗体（名
6、称为 Form1）上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写一个事件过程。程序运行以后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试” 。以下能实现上述操作的事件过程是： A） Private Sub Text1_Change(）Command1.Caption=”计算机等级考试”End SubB） Private Sub Command1_Click(）Caption=”计算机等级考试 ”End SubC） Private Sub Form1_Click(）Text1.Caption=”计算机等级考试”End SubD）
7、Private Sub Command1_Click(）Text1.Text=”计算机等级考试 ”End Sub(12）设 a=5,b=4,c=3,d=2，下列表达式的值是 32*b Or a=c And bdA） 1 B） True C） False D） 2(13）设 a=”MicrosoftVisualBasic”, 则以下使变量 b 的值为”VisualBasic”的语句是A）b=Left(a,10） B）b=Mid(a,10） C）b=Right(a,10 ） D）b=Mid(a,11,10 ）(14）假定有如下的窗体事件过程，程序运行后单击窗体，则在弹出的信息框中的标题栏中显示的信
8、息是：Private Sub Form_Click(）a$ = “Microsoft Visual Basic“b$ = Right(a$, 5）c = Mid(a$, 1, 9）MsgBox a$, 34, b$, c$, 5End Sub2005 年 4 月全国计算机等级考试二级VB 笔试真题2A）Microsoft Visual B）Microsoft C）Basic D）5(15）设 a=”a”,b=”b”,c=”c”,d=”d”,执行语句 x=IIf(a 0 And a 10 And a 20 And a c Thend = d + x(i）: c = x(i）Elsed = d -
9、 cEnd IfNext iPrint dEnd Sub程序运行后,如果单击命令按钮,则在窗体上输入的内容为A）10 B）16C）12 D）20(32）设有如下程序:Private Sub Command1_Click(）Dim c As Integer, d As Integerc = 4d = InputBox(“请输入一个整数 “）Do While d 0If d c Thenc = c + 1End Ifd = InputBox(“请输入一个整数 “）LoopPrint c + dEnd Sub程序运行后,单击命令按钮如果在输入对话框中依次输入 1、2、3、4、5、6、7、8、9、0,
10、则输出结果是:A）12 B）11C）10 D）9(33）在窗体上画一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框,在文本框中输入以下字符串:Microsoft Visual Basic Programming，然后编写如下事件过程:Private Sub Command1_Click(）Open “d:tempoutf.txt“ For Output As #1For i = 1 To Len(Text1.Text）c = Mid(Text1.Text, i, 1）If c = “A“ And c 0Print sEnd Sub以上程序的功能是【10】,程序运行后,
11、单击窗体,输出结果为【11】(10）设有如下程序:Option Base 1Private Sub Command1_Click(）Dim arr1Dim Min As Integer, i As Integerarr1 = Array(12, 435, 76, -24, 78, 54, 866, 43）Min = 【12】 For i = 2 To 8If arr1(i） a+c 的值是 A）-1 B）1 C）True D）False（15）设 a = 5，b = 10，则执行 c = Int(b - a） * Rnd + a） + 1后，c 值的范围为2005 年 9 月全国计算机等级考试
12、二级VB 笔试真题8A）510 B）69 C）610 D）59（16）在窗体上画一个命令按钮，名称为 Command1，然后编写如下事件过程：Private Sub Command1_Click(） a$ = “software and hardware“ b$ = Right(a$, 8） c$ = Mid(a$, 1, 8） MsgBox a$, , b$, c$, 1End Sub运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是A）software and hardware B）software C）hardware D）1（17）在窗体上画一个命令按钮和一个文本框，其名称分别
13、为 Command1 和 Text1，把文本框的 Text 属性设置为空白，然后编写如下事件过程：Private Sub Command1_Click(） a = InputBox(“Enter an integer“） b = InputBox(“Enter an integer“） Text1.Text = b + aEnd Sub程序运行后，单击命令按钮，如果在输入对话框中分别输入 8 和 10，则文本框中显示的内容是 A）108 B）18 C）810 D）出错（18）在窗体上画两个文本框，其名称分别为 Text1 和 Text2，然后编写如下程序：Private Sub Form_Lo
14、ad(） Show Text1.Text = “: Text2.Text = “: Text1.SetFocusEnd SubPrivate Sub Text1_Change(） Text2.Text = Mid(Text1.Text, 8）End Sub程序运行后，如果在文本框 Text1 中输入 BeijingChina，则在文本框 Text2 中显示的内容是A）BeijingChina B）China C）Beijing D）BeijingC（19）在窗体上画一个列表框和一个命令按钮，其名称分别为 List1 和 Command1，然后编写如下事件过程：Private Sub Form_
15、Load(） List1.AddItem “Item 1“ List1.AddItem “Item 2“ List1.AddItem “Item 3“End SubPrivate Sub Command1_Click(） List1.List(List1.ListCount） = “AAAA“End Sub程序运行后，单击命令按钮，其结果为A）把字符串“AAAA”添加到列表框中，但位置不能确定B）把字符串“AAAA”添加到列表框的最后（即“Item 3” 的后面）C）把列表框中原有的最后一项改为“AAAA”D）把字符串“AAAA”插入到列表框的最前面（即“Item 1”的前面）（20）假定有如下事件过程：Private Sub Form_Click(） Dim x As Integer, n As Integer x = 1 n = 0 Do While x 28 x = x * 3 n = n + 1 Loop Print x, nEnd Sub程序运行后，单击窗体，输出结果是A）81 4 B）56 3 C）28 1 D）243 5（21）有如下程序： Private Sub Form_Click(） Dim Check, Counter Check = True Counter = 0 Do Do While Counter 20
