2005年9月全国计算机等级考试二级笔试试卷公共基础知识和Visual Basic 语言程序设计(考试时间90 分钟，满分100 分)一、选择题 (每小题 2 分,共 70 分 )下列各题A) 、 B) 、C)、 D) 四个选项中，只有一个选项是正确的。
请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
（1）下列叙述中正确的是A ．程序设计就是编制程序C．程序经调试改错后还应进行再测试C。
B．程序的测试必须由程序员自己去完成D．程序经调试改错后不必进行再测试（2）下列数据结构中，能用二分法进行查找的是A ．顺序存储的有序线性表 B ．线性链表AC．二叉链表。
D．有序线性链表（3）下列关于栈的描述正确的是C。
A．在栈中只能插入元素而不能删除元素B．在栈中只能删除元素而不能插入元素C．栈是特殊的线性表，只能在一端插入或删除元素D．栈是特殊的线性表，只能在一端插入元素，而在另一端删除元素（4）下列叙述中正确的是D。
A．一个逻辑数据结构只能有一种存储结构B．数据的逻辑结构属于线性结构，存储结构属于非线性结构C．一个逻辑数据结构可以有多种存储结构，且各种存储结构不影响数据处理的效率D．一个逻辑数据结构可以有多种存储结构，且各种存储结构影响数据处理的效率（5）下列描述中正确的是C。
A．软件工程只是解决软件项目的管理问题B．软件工程主要解决软件产品的生产率问题C．软件工程的主要思想是强调在软件开发过程中需要应用工程化原则D．软件工程只是解决软件开发中的技术问题（6）在软件设计中，不属于过程设计工具的是D。
A ． PDL( 过程设计语言 )B ．PAD 图C． N-S 图 D． DFD 图（7）下列叙述中正确的是A。
A ．软件交付使用后还需要进行维护B．软件一旦交付使用就不需要再进行维护C．软件交付使用后其生命周期就结束D．软件维护是指修复程序中被破坏的指令（8）数据库设计的根本目标是要解决A。
A ．数据共享问题B．数据安全问题C．大量数据存储问题 D ．简化数据维护（9）设有如下关系表 :R S TA B C A B C A B C112313112223223313则下列操作中正确的是B。
A．T＝R∩S B．T＝R∪S C． T＝R×S D．T＝R/S（10）数据库系统的核心是B。
A ．数据模型B ．数据库管理系统C．数据库D．数据库管理员（11）假定一个Visual Basic 应用程序由一个窗体模块和一个标准模块构成。
为了保存该应用程序，以下正确的操作是B。
A ．只保存窗体模块文件B ．分别保存窗体模块、标准模块和工程文件C．只保存窗体模块和标准模块文件 D ．只保存工程文件（12）为了清除窗体上的一个控件，下列正确的操作是C。
A．按回车键B．按 Esc 键C．选择（单击）要清除的控件，然后按Del 键D．选择（单击）要清除的控件，然后按回车键（13）以下叙述中错误的是C。
A．打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件B．当程序运行时，双击一个窗体，则触发该窗体的DblClick 事件C． Visual Basic 应用程序只能以解释方式执行D．事件可以由用户引发，也可以由系统引发（14）设 a=2, b=3, c=4, d=5,下列表达式的值是D。
Not a<=c Or 4*c=b^2 And b<>a+cA ． -1B ． 1C． True D． False（15）设 a = 5，b = 10 ，则执行 c = Int((b - a) * Rnd + a) + 1后，c值的范围为C。
A ． 5～10B． 6～9C． 6～ 10D． 5～ 9（16）在窗体上画一个命令按钮，名称为Command1 ，然后编写如下事件过程：Private Sub Command1_Click()a$ = "software and hardware"b$ = Right(a$, 8)c$ = Mid(a$, 1, 8)MsgBox a$, b$, c$, 1End Sub2运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是C。
A ． software and hardware B． software C． hardware D． -1（17）在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的 Text 属性设置为空白，然后编写如下事件过程：Private Sub Command1_Click()a = InputBox("Enter an integer")b = InputBox("Enter an integer")Text1.Text = b + aEnd Sub8 和10，则文本框中显示的内程序运行后，单击命令按钮，如果在输入对话框中分别输入容是A。
A．108B． 18C．810D．出错（18）在窗体上画两个文本框，其名称分别为Text1 和Text2，然后编写如下程序：Private Sub Form_Load()ShowText1.Text = ""Text2.Text = ""Text1.SetFocusEnd SubPrivate Sub Text1_Change()Text2.Text = Mid(Text1.Text, 8)End Sub程序运行后，如果在文本框Text1 中输入BeijingChina ，则在文本框Text2 中显示的内容是B。
A ． BeijingChinaB ．China C． Beijing D． BeijingC（19）在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：Private Sub Form_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程序运行后，单击命令按钮，其结果为B。
A ．把字符串“ AAAA ”添加到列表框中，但位置不能确定B．把字符串“AAAA ”添加到列表框的最后（即“Item 3”的后面）C．把列表框中原有的最后一项改为“AAAA ”D．把字符串“ AAAA ”插入到列表框的最前面（即“Item 1”的前面）（20）假定有如下事件过程：Private Sub Form_Click()Dim x As Integer, n As Integerx = 1n = 0Do While x < 28x = x * 3n = n + 1LoopPrint x, nEnd Sub程序运行后，单击窗体，输出结果是A。
A．81 4B．56 3C． 28 1D．2435（21）有如下程序：Private Sub Form_Click()Dim Check, CounterCheck = TrueCounter = 0DoDo While Counter < 20Counter = Counter + 1If Counter = 10 ThenCheck = FalseExit DoEnd IfLoopLoop Until Check = FalsePrint Counter, CheckEnd Sub程序运行后，单击窗体，输出结果为D。
A ． 15 0B． 20 -1C． 10 True D ．10 False（22）有如下程序：Private Sub Form_Click()Dim i As Integer, sum As Integersum = 0For i = 2 To 10If i Mod 2 <> 0 And i Mod 3 = 0 Thensum = sum + iEnd IfNext iPrint sumEnd Sub4程序运行后，单击窗体，输出结果为A。
A．12B． 30C．24D． 18（23）在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是A。
A．12B． 13C．14D． 15（24）在窗体上画一个命令按钮，其名称为Command1 ，然后编写如下事件过程：Private Sub Command1_Click()Dim a1(4, 4), a2(4, 4)For i = 1 To4For j = 1 To4a1(i, j) = i + ja2(i, j) = a1(i, j) + i + jNext jNext iPrint a1(3, 3); a2(3, 3)End Sub程序运行后，单击命令按钮，在窗体上输出的是D。
A ． 66B． 105C． 721D． 612（25）有如下程序：Option Base 1Private Sub Form_Click()Dim arr, SumSum = 0arr = Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19)For i = 1 To 10If arr(i) / 3 = arr(i) \ 3 ThenSum = Sum + arr(i)End IfNext iPrint SumEnd Sub程序运行后，单击窗体，输出结果为C。
A ． 25B． 26C．27D． 28（26）在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a(5) As StringFor i = 1 To 5a(i) = Chr(Asc("A") + (i - 1))Next iFor Each b In aPrint b;NextEnd Sub程序运行后，单击命令按钮，输出结果是A。