| 全国计算机等级考试 历年真题 2007年4月计算机等级考试二级VB考前密卷(2) |
一、选择题（每题2分，共计70分） |
|
|
|
2.用链表表示线性表的优点是
A) 便于随机存取
B) 花费的存储空间较顺序存储少
C) 便于插入和删除操作
D) 数据元素的物理顺序与逻辑顺序相同
|
|
A
B
C
D
|
3.数据结构中，与所使用的计算机无关的是数据的
A) 存储结构
B) 物理结构
C) 逻辑结构
D) 物理和存储结构
|
|
A
B
C
D
|
4.结构化程序设计主要强调的是
A) 程序的规模
B) 程序的效率
C) 程序设计语言的先进性
D) 程序易读性
|
|
A
B
C
D
|
5.软件设计包括软件的结构、数据接口和过程设计，其中软件的过程设计是指
A) 模块间的关系
B) 系统结构部件转换成软件的过程描述
C) 软件层次结构
D) 软件开发过程
|
|
A
B
C
D
|
6.检查软件产品是否符合需求定义的过程称为
A)确认测试
B)集成测试
C)验证测试
D)验收测试
|
|
A
B
C
D
|
7.数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。
下列图符名标识的图符不属于数据流图合法图符的是
A)控制流
B)加工
C)数据存储
D)源和潭
|
|
A
B
C
D
|
8.应用数据库的主要目的是
A) 解决数据保密问题
B) 解决数据完整性问题
C) 解决数据共享问题
D) 解决数据量大的问题
|
|
A
B
C
D
|
9.在数据库设计中，将E-R图转换成关系数据模型的过程属于
A) 需求分析阶段
B) 逻辑设计阶段
C) 概念设计阶段
D) 物理设计阶段
|
|
A
B
C
D
|
10.在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶
段和数据库系统阶段。其中数据独立性最高的阶段是
A)数据库系统
B)文件系统
C)人工管理
D)数据项管理
|
|
A
B
C
D
|
11.窗体文件的扩展名是
A) .bas
B) .cls
C) .frm
D) .res
|
|
A
B
C
D
|
12.下列可以启动Visual Basic的方法是
A) 打开"我的电脑"，找到存放Visual Basic所在系统文件的硬盘及文件夹，
双击"VB6.exe"图标
B) 在DOS窗口中，键入Visual Basic的路径，执行Visual Basic可执行文件
C) 利用"开始"菜单中的"程序"命令可启动Visual Basic
D) A) 和C)
|
|
A
B
C
D
|
13.关于货币型数据的说明，正确的是
A) 货币型数据有时可以表示成整型数据
B) 货币型数据与浮点型数据完全一样
C) 货币型数据是由数字和小数点组成的字符串
D) 货币型数据是小数点位置固定的实型数
|
|
A
B
C
D
|
14.在运行程序时，在文本框中输入新的内容，或在程序代码中改变Text的属性值，
相应会触发到什么事件？
A) GotFocus
B) Click
C) Change
D) DblClick
|
|
A
B
C
D
|
15.如果一个变量未经定义就直接使用，则该变量的类型为
A) Integer
B) Byte
C) Boolean
D) Variant
|
|
A
B
C
D
|
16.根据变量的作用域，可以将变量分为3类，分别为
A) 局部变量、模块变量和全局变量
B) 局部变量、模块变量和标准变量
C) 局部变量、模块变量和窗体变量
D) 局部变量、标准变量和全局变量
|
|
A
B
C
D
|
17.标签控件能够显示文本信息，文本内容只能用什么属性来设置？
A) Alignment
B) Caption
C) Visible
D) BorderStyle
|
|
A
B
C
D
|
18.一个工程必须包含的文件的类型是
A) *.vbp *.frm *.frx
B) *.vbp *.cls *.bas
C) *.bas *.ocx *.res
D) *.frm *.cls *.bas
|
|
A
B
C
D
|
19.在Visual Basic中，要使标签的标题栏居中显示，则将其Alignment属性设置为
A) 0
B) 2
C) 1
D) 3
|
|
A
B
C
D
|
20.在Visual Basic中，组合框是文本框和什么的特性的组合？
A) 复选框
B) 标签
C) 列表框
D) 目录列表框
|
|
A
B
C
D
|
21.当滚动条位于最左端或最上端时，Value属性被设置为
A) Min
B) Max
C) Max和Min之间
D) Max和Min之外
|
|
A
B
C
D
|
22.下面的数组声明语句中正确的是
A) Dim gg［1,5］ As String
B) Dim gg［1 To 5,1 To 5］ As String
C) Dim gg(1 To 5) As String
D) Dim gg［1 :5,1: 5］ As String
|
|
A
B
C
D
|
23.下列说法正确的是
A) 任何时候都可以使用标准工具栏的"菜单编辑器"按钮打开菜单编辑器
B) 只有当代码窗口为当前活动窗口时，才能打开菜单编辑器
C) 只有当某个窗体为当前活动窗体时，才能打开菜单编辑器
D) 任何时候都可以使用"工具"菜单下的"菜单编辑器"命令，打开菜单编辑器
|
|
A
B
C
D
|
24.下列各选项说法错误的一项是
A) 文件对话框可分为两种，即打开(Open) 文件对话框和保存(Save As) 文件对话框
B) 通用对话框的Name属性的默认值为CommonDialogX，此外，每种对话框都有自己的
默认标题
C) 打开文件对话框可以让用户指定一个文件，由程序使用；而用保存文件对话框可以
指定一个文件，并以这个文件名保存当前文件
D) DefaultEXT属性和DialogTitle属性都是打开对话框的属性，但非保存对话框的属性
|
|
A
B
C
D
|
25.用InputBox函数设计的对话框，其功能是
A) 只能接收用户输入的数据，但不会返回任何信息
B) 能接收用户输入的数据，并能返回用户输入的信息
C) 既能用于接收用户输入的信息，又能用于输出信息
D) 专门用于输出信息
|
|
A
B
C
D
|
26.下列程序段的执行结果为
I=4
x=5
Do
I=I + 1
x=x + 2
Loop Until I>=7
Print "I="; I
Print "x="; x
A) I＝4x＝5
B) I＝7x＝15
C) I＝6x＝8
D) I＝7x＝11
|
|
A
B
C
D
|
27.下列程序段的执行结果为
a=1
b=5
Do
a=a + b
b=b + 1
Loop While a < 10
Print a; b
A) 1 5
B) 12 7
C) a b
D) 10 25
|
|
A
B
C
D
|
28.下列程序段的执行结果为
a=75
If a > 60 Then I=1
If a > 70 Then I=2
If a > 80 Then I=3
If a < 90 Then I=4
Print "I="; I
A) I＝1
B) I＝2
C) I＝3
D) I＝4
|
|
A
B
C
D
|
29.有如下事件过程：
Private Sub Command1_Click()
b=10
Do Until b=-1
a=InputBox("请输入a的值")
a=Val(A)
b=InputBox("请输入b的值")
b=Val(b)
a=a * b
Loop
Print a
End Sub
程序运行后，依次输入数值30，20，10，－1，输出结果为
A) 6000
B) －10
C) 200
D) -6000
|
|
A
B
C
D
|
30.下面程序段执行结果为
x=Int(Rnd() + 3)
Select Case x
Case 5
Print "excellent"
Case 4
Print "good"
Case 3
Print "pass"
Case Else
Print "fail"
End Select
A) excellent
B) good
C) pass
D) fail
|
|
A
B
C
D
|
31.定义过程的格式中，Static关键字的作用是指定过程中的局部变量在内存中的存
储方式。若使用了Static关键字，则
A) 每次调用此过程，该过程中的局部变量都会被重新初始化
B) 在本过程中使用到的，在其他过程中定义的变量也为Statci型
C) 每次调用此过程时，该过程中的局部变量的值保持在上一次调用后的值
D) 定义了该过程中定义的局部变量为"自动"变量
|
|
A
B
C
D
|
32.单击命令按钮时，下列程序的执行结果为
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=50: y=78
Call PPP(x, y)
Print x; y
End Sub
Public Sub PPP(ByVal n As Integer, ByVal m As Integer)
n=n ＼ 10
m=m ＼ 10
End Sub
A) 08
B) 5078
C) 450
D) 7850
|
|
A
B
C
D
|
33.单击按钮时，以下程序运行后的输出结果是
Private Sub proc1(x As Integer, y As Integer, z As Integer)
x=3 * z
y=2 * z
z=x + y
End Sub
Private Sub Command1_Click()
Dim x As Integer, y As Integer, z As Integer
x=1: y=2: z=3
Call proc1(x, x, z)
Print x; x; z
Call proc1(x, y, y)
Print x; y; y
End Sub
A) 6 6 12
6 10 10
B) 9 5 10
5 10 10
C) 9 6 12
9 10 15
D) 9 10 10
5 4 10
|
|
A
B
C
D
|
34.单击命令按钮时，下列程序的运行结果为
Private Sub Command1_Click()
Print MyFund(20, 18)
End Sub
Public Function MyFund(m As Integer, n As Integer) As Integer
Do While m <> n
Do While m > n: m=m - n: Loop
Do While m < n: n=n - m: Loop
Loop
MyFund=m
End Function
A) 0
B) 2
C) 4
D) 6
|
|
A
B
C
D
|
35.单击命令按钮时，下列程序的运行结果为
Private Sub Command1_Click()
Print MyFund(20, 18)
End Sub
Public Function MyFund(m As Integer, n As Integer) As Integer
Do While m <> n
Do While m > n: m=m - n: Loop
Do While m < n: n=n - m: Loop
Loop
MyFund=m
End Function
A) 0
B) 2
C) 4
D) 6
|
|
A
B
C
D
|
二、填空题（每空2分，共计30分） |
| 1.数据的逻辑结构有线性结构和 【1】 两大类。
|
| 输入答案，中间不含空格:
|
| 2.顺序存储方法是把逻辑上相邻的结点存储在物理位置 【2】 的存储单元中。
|
| 输入答案，中间不含空格:
|
3.一个类可以从直接或间接的祖先中继承所有属性和方法。
采用这个方法提高了软件的 【3】 。
|
| 输入答案，中间不含空格:
|
| 4.软件工程研究的内容主要包括： 【4】 技术和软件工程管理。
|
| 输入答案，中间不含空格:
|
| 5.关系操作的特点是 【5】 操作。
|
| 输入答案，中间不含空格:
|
| 6.函数Str$(256.36) 的值是 【6】 。
|
| 输入答案，中间不含空格:
|
7.执行下面的程序段，x的值为 【7】 。
Private Sub Command1_Click()
For i=1 To 9
a=a + i
Next i
x=Val(i)
MsgBox x
End Sub
|
| 输入答案，中间不含空格:
|
8.以下程序的功能是从键盘输入若干个学生的考试成绩，统计并输出
最高分和最低分，当输入负数时结束输入，输出结果。请补充完整
下列程序段。
Dim x, amax, amin As Single
x=InputBox("Enter a score")
amax=x
amin=x
Do While 【8】
If x > amax Then
amax=x
End If
If 【9】 Then
amin=x
End If
x=InputBox("enter a score")
Loop
Print "max="; amax, "min="; amin
|
| 输入答案，中间不含空格:
|
| 9.上一题【9】
|
| 输入答案，中间不含空格:
|
10.(9) 下列程序的输出结果为 【10】 。
num=2
While num <=3
num=num + 1
Print num
Wend
|
| 输入答案，中间不含空格:
|
11.以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。
Sub RecArea(L, W)
Dim S As Double
S=L * W
MsgBox "Total Area is " & Str(S)
End Sub
Private Sub Command1_Click()
Dim M, N
M=InputBox("What is the L?")
M=Val(M)
【11】
N=Val(N)
【12】
End Sub
|
| 输入答案，中间不含空格:
|
| 12.上一题【12】
|
| 输入答案，中间不含空格:
|
| 13.在KeyPress事件过程中，KeyAscii是所按键的 【13】 值。
|
| 输入答案，中间不含空格:
|
14.有一个事件过程，其功能是：从已存在于磁盘上的顺序文件NM1.txt中读取数据，
计算读出数据的平方值，将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。
Private Sub Form_Click()
Dim x As Single, y As Single
Open "NM1.txt" For Input As #1
Open "NM2.txt" For Input As #2
Do While Not EOF(1)
【14】
Print x
y=x ^ 2
【15】
Print y
Loop
Close #1, #2
End Sub
|
| 输入答案，中间不含空格:
|
| 15.上一题【15】
|
| 输入答案，中间不含空格:
|
Hi,亲爱的朋友，欢迎光临Passtwo！
您想做点什么呢？
I Want....
热门软件下载
实用电子地图
本站隆重推荐自主开发的VFP上机模拟系统免费下载使用
二级vfp上机模拟系统
|
