2006-9 vb

2006年9月全国计算机等级考试二级VB语言笔试试题及答案
(1)下列选项中不符合良好程序设计风格的是（）。

A．源程序要文档化
B．数据说明的次序要规范化
C．避免滥用goto 语句
D．模块设计要保证高耦合、高内聚
(2)从工程管理角度，软件设计一般分为两步完成，它们是（）。

A．概要设计与详细设计
B．数据设计与接口设计
C．软件结构设计与数据设计
D．过程设计与数据设计
(3)下列选项中不属于软件生命周期开发阶段任务的是（）。

A．软件测试
B．概要设计
C．软件维护
D．详细设计
(4)在数据库系统中，用户所见的数据模式为（）。

A．概念模式
B．外模式
C．内模式
D．物理模式
(5)数据库设计的四个阶段是：需求分析、概念设计、逻辑设计和（）。

A．编码设计
B．测试阶段
C．运行阶段
D．物理设计
(6)设有如下三个关系表：
下列操作中正确的是（）。

(7)下列叙述中正确的是（）。

A．一个算法的空间复杂度大，则其空间复杂度也必定大
B．一个算法的空间复杂度大，则其时间复杂度必定小
C．一个算法的时间复杂度大，则其空间复杂度必定小
D．上述三种说法都不对
(8)在长度为64 的有序线性表中进行顺序查找，最坏情况下需要比较的次数为（）。

A．63
B．64
C．6
D．7
(9)数据库技术的根本目标是要解决数据的（）。

A．存储问题
B．共享问题
C．安全问题
D．保护问题
(10)对下列二叉树：
进行中序遍历的结果是（）。

A．ACBDFEG
B．ACBDFGE
C．ABDCGEF
D．FCADBEG
(11)以下叙述中正确的是（）。

A．窗体的Name 属性指定窗体的名称，用来标识一个窗体
B．窗体的Name 属性值是显示在窗体标题栏中文本
C．可以在运行期间改变窗体的Name 属性的值
D．窗体的Name 属性值可以为空
(12)以下叙述中错误的是（）。

A．打开一个工程文件时，系统自动装入与该工程有关的窗体文件B．保存Visual Basic 程序时，应分别保存窗体文件及工程文件C．Visual Basic 应用程序只能以解释方式执行
D．窗体文件包含该窗体及其控件的属性
(13)设a=2,b=3,c=4, 下列表达式的值是（）。

Not a <= c Or 4*c = b^2 And b <> a+c
A．-1
B．1
C．True
D．False
(14)没有如下的用户定义类型：
Type Student
number As String
name As String
A) ge AS Integer
End Type
则以下正确引用该类型成员的代码是（）。

A．Student. name= “李明”
B．Dim s As Student
C．Dim s As Type Student
D．Dim s As Type
A ． 1 2 3
B ． 1 2 3
C ．
1 2 3
D ．
1
2
3 & 2
4 6 3 4
5 2 5 8 4 5 6
3
6
9
4
5
6
3
6
9
7
8
9
二、填空题（每空 2 分，共30 分）
请将每空的正确答案写在答题卡【 1 】~ 【15 】序号的横线上，答在试卷上不得分。

1 下列软件系统结构图
的宽度为【 1 】。

2 【2 】的任务是诊断和改正程序中的错误。

3 一个关系表的行称为【3 】。

4 按“先进后出”原则组织数据的数据结构是【 4 】。

5 数据结构分为线性结构和非线性结构，带链的队列属于【 5 】。

6 描述"X 是小于100 的非负整数" 的V isual Basic 表达式是【6 】。

7 在窗体上有一个名称为Command1 的命令按钮和一个名称为Text1 的文本框。

程序运行后，Command1 为禁用（灰色），此时如果在文本框中输入字符，则命令按钮Command1 变为可用。

请填空。

Private Sub Form_Load()
C) Ommand1 Enabled=False
End Sub
Private Sub Text1_ 【7 】()
C) ommand1 Enabled=True
End Sub
8 在窗体上画一个名称为"Command1" 的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
D) Im a As String
A) ="123456789"
For i=1 To 5
Print Space(6-i);Mid $ (a, 【8 】,2*i-1)
Next i
End Sub
程序运行后，单击命令按钮，窗体上的输出结果是
5
456
34567
2345678
123456789
请填空。

9 以下程序的功能是：将一维组A中的100 个元素分别赋给二维数组B 的每个元素并打印出来，要求把A（ 1 ）到A（10 ）依次赋给 B （ 1 ，1 ）到 B （ 1 ，10 ），把A（11 ）到A（20 ）依次赋给B （ 2 ， 1 ）到 B （ 2 ，10 ），……，把A （91 ）到A（100 ）依次赋给B （10 ， 1 ）到 B （10 ，10 ）。

请填空。

Option Base 1
Private Sub Form_Click()
D) im i As Integer,j As Integer
D) im A(1 To 100) As Integer
D) im B(1 To 10,1 To 10) As Integer
For i=1 To 100
A) (i)=Int(Rnd * 100)
Next i
For i=1 To 【9 】
For j=1 To 【10 】
B) (i,j)= 【11 】
Print B(i,j);
Next j
Print
Next i
End Sub
10 在窗体上画一个名称为Combo1 的组合框，然后画两个名称分别为Label1 、Label2 ，标题分别为" 城市名称" 和空白的标签。

程序运行后，在组合框中输入一个新项目并按回车键，如果输入的项目在组合框的列表中不存在，则自动将其添加到组合框的列表中，并在Label2 中给出提示" 已成功添加新输入页。

" ，如图所示。

如果输入的项目已存在，则在Label2 中给出提示" 输入项已在组合框中。

"。

请填空。

Private Sub Combol_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
For i=0 To Combo1 ListCount-1
If Combo1 Text= 【12 】Then
Label2 Caption=" 输入项已在组合框中。

"
Exit Sub
End If
Next i
Label2 Caption=" 已成功添加新输入项。

"
C) ombo1 【13 】Combo1 Text
End If
End Sub
11 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1 和Text1 ，然后编写如下事件过程：
Private Sub Command1_Click()
D) im inData As String
Text1 Text=" "
OPen "d:|| ML ）||Myfile txt" for 【14 】As #1
D) o While 【15 】
Input # 1,inData
Text1 Text=Text1 Text+inData
Loop
C) lose #1
End Sub
程序的功能是，打开 D 盘根目录下的文本文件myfile t x t, 读取它的全部内容并显示在文本框中。

请填空。