07年4月计算机等级考试二级VB考前密卷(1)-在线考试系统

1、【单选题】
在深度为5的满二叉树中，叶子结点的个数为 [2分]

、 32

、 31

、 16

、 15

答案：

2、【单选题】
若某二叉树的前序遍历访问顺序是abdgcefh，中序遍历访问顺序是dgbaechf，则其后序遍历的结点访问顺序是 [2分]

、 bdgcefha

、 gdbecfha

、 bdgaechf

、 gdbehfca

答案：

3、【单选题】
一些重要的程序语言(如C语言和Pascal语言) 允许过程的递归调用。而实现递归调用中的存储分配通常用 [2分]

、栈

、堆

、数组

、链表

答案：

4、【单选题】
软件工程的理论和技术性研究的内容主要包括软件开发技术和 [2分]

、消除软件危机

、软件工程管理

、程序设计自动化

、实现软件可重用

答案：

5、【单选题】
开发软件时对提高开发人员工作效率至关重要的是 [2分]

、操作系统的资源管理功能

、先进的软件开发工具和环境

、程序人员的数量

、计算机的并行处理能力

答案：

6、【单选题】
在软件测试设计中，软件测试的主要目的是 [2分]

、实验性运行软件

、证明软件正确

、找出软件中全部错误

、发现软件错误而执行程序

答案：

7、【单选题】
数据处理的最小单位是 [2分]

、数据

、数据元素

、数据项

、数据结构

答案：

8、【单选题】
索引属于 [2分]

、模式

、内模式

、外模式

、概念模式

答案：

9、【单选题】
下述关于数据库系统的叙述中正确的是 [2分]

、数据库系统减少了数据冗余

、数据库系统避免了一切冗余

、数据库系统中数据的一致性是指数据类型一致

、数据库系统比文件系统能管理更多的数据

答案：

10、【单选题】
数据库系统的核心是 [2分]

、数据库

、数据库管理系统

、模拟模型

、软件工程

答案：

11、【单选题】
下列说法错误的是 [2分]

、窗体文件的扩展名为.frm

、一个窗体对应一个窗体文件

、 Visual Basic中的一个工程只包含一个窗体

、 Visual Basic中一个工程最多可以包含255个窗体

答案：

12、【单选题】
下列四组控件属性中，属性值的类型不相同的一组是 [2分]

、 Label控件的Enabled属性与TextBox控件的Enabled属性

、 OptionButton控件的Value属性与CheckBox控件的Value属性

、 Command控件的Default属性与Command控件的Cancel属性

、 Command控件的Visible属性与Form控件的Visible属性

答案：

13、【单选题】
下列方法中不能退出Visual Basic的是 [2分]

、按Alt+Q组合键

、按下Alt+F组合键，然后按Esc键

、打开"文件"菜单，执行"退出"命令

、按F10键，然后按F键，再按X键

答案：

14、【单选题】
任何控件都有的属性是 [2分]

、 BackColor

、 Caption

、 Name

、 BorderStyle

答案：

15、【单选题】
可以实现从键盘输入一个作为双精度变量a的值的语句是 [2分]

、 a=InputBox()

、 a=InputBox("请输入一个值")

、 a=Val(InputBox("请输入一个值") )

、 a=Val(InputBox() )

答案：

16、【单选题】
在Visual Basic中，要强制用户对所用的变量进行显式声明，这可以在哪里设置? [2分]

、 "属性"对话框

、 "程序代码"窗口

、 "选项"对话框

、对象浏览器

答案：

17、【单选题】
下列语句中，获得列表框List1中项目个数的语句是 [2分]

、 x=List1.ListCount

、 x=ListCount

、 x=List1.ListIndex

、 x=ListIndex

答案：

18、【单选题】
要获得当前驱动器应使用驱动器列表框的属性是 [2分]

、 Path

、 Drive

、 Dir

、 Pattern

答案：

19、【单选题】
如果将文本框的MaxLength属性设置为0，则文本框中的字符不能超过 [2分]

、 8K

、 16K

、 32K

、 64K

答案：

20、【单选题】
当在滚动条内拖动滚动块时触发 [2分]

、 KeyUp事件

、 KeyPress事件

、 Scroll事件

、 Change事件

答案：

21、【单选题】
设有声明语句
Dim b(-1 To 10, 2 To 9, 20) As Integer
则数组b中全部元素的个数 [2分]

、 2310

、 2016

、 1500

、 1658

答案：

22、【单选题】
设在窗体上有个文本框，然后编写如下的事件过程：
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Const Alt=4
Const Key_F2=&H71
altdown%=(Shift And Alt) > 0
f2down%=(KeyCode=Key_F2)
If altdown% And f2down% Then
Text1.Text="BBBBB"
End If
End Sub
上述程序运行后，如果按【Shift+F2】，则在文本框中显示得是 [2分]

、 Alt+F2

、 BBBBB

、随机出几个数

、文本框平均内容无变化

答案：

23、【单选题】
设已经在"菜单编辑器"中设计了窗体的快捷菜单，其顶级菜单为Bs，取消其"可见"属性，运行时，在以下事件过程中，可以使快捷菜单响应鼠标右键菜单的是 [2分]

、 Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
If Button=2 Then PopupMenu Bs, 2
End Sub

、 Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
PopupMenu Bs
End Sub

、 Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
PopupMenu Bs,0
End Sub

、 Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
If (Button=vbLeftButton) Or (Button=vbRightButton) Then PopupMenu Bs
End Sub

答案：

24、【单选题】
要将名为MyForm的窗体显示出来，正确的使用方法是 [2分]

、 MyForm.Show

、 Show.MyForm

、 MyForm Load

、 MyForm Show

答案：

25、【单选题】
下列程序段的执行结果为
a=5
For k=1 To 0
a=a + k
Next k
Print k; a [2分]

、 -1 6

、 -1 16

、 1 5

、 11 21

答案：

26、【单选题】
下列程序段的执行结果为
I=9
x=5
Do
I=I + 1
x=x + 2
Loop Until I >=7
Print "I="; I
Print "x="; x [2分]

、 I＝4x＝5

、 I＝7x＝15

、 I＝6x＝8

、 I＝10x＝7

答案：

27、【单选题】
以下程序段运行时从键盘上输入字符"-"，则输出结果为
op$=InputBox("op=")
If op$="+" Then a=a + 2
If op$="-" Then a=a - 2
Print a [2分]

、 2

、 -2

、 0

、 +2

答案：

28、【单选题】
以下程序段的输出结果为
Dim l, a(10) , p(3)
k=5
For i=0 To 10
a(i) =i
Next i
For i=0 To 2
p(i) =a(i (i + 1) )
Next i
For i=0 To 2
k=k + p(i) 2
Next i
Print k [2分]

、 20

、 21

、 56

、 32

答案：

29、【单选题】
下列程序的执行结果为
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=12: y=20
Call Value(x, y)
Print x; y
End Sub
Private Sub Value(ByVal m As Integer, ByVal n As Integer)
m=m * 2: n=n - 5
Print m; n
End Sub [2分]

、 20 12
20 15

、 12 20
12 25

、 24 15
12 20

、 24 12
12 15

答案：

30、【单选题】
在窗体上画一个命令按钮，然后编写下列程序
Private Sub Command3_Click()
Tcl 2
Tcl 3
Tcl 4
End Sub
Sub Tcl(a As Integer)
Static x As Integer
x=x + a
Print x;
End Sub
程序运行后，单击命令按钮，输出结果为 [2分]

、 2 3 4

、 2 5 9

、 3 5 4

、 2 4 3

答案：

31、【单选题】
下面程序段，运行后的结果是Private Sub Command1_Click()
Dim b%(1 To 4) , i%, t#
For i=1 To 4
b(i) =i
Next i
t=Tof(b() )
Print "t="; t,
End Sub
Function Tof(a() As Integer)
Dim t#, i%
t=1
For i=2 To UBound(A)
t=t * a(i)
Next i
Tof=t
End Function [2分]

、 t＝18

、 t＝24

、 t＝30

、 t＝32

答案：

32、【单选题】
单击按钮时，以下程序运行后的输出结果是
Private Sub Command1_Click()
Dim x As Integer, y As Integer, z As Integer
x=1: y=2: z=3
Call God(x, x, z)
Print x; x; z
Call God(x, y, y)
Print x; y; y
End Sub
Private Sub God(x As Integer, y As Integer, z As Integer)
x=3 * z + 1
y=2 * z
z=x + y
End Sub [2分]

、 6 6 12
7 11 11

、 8 5 10
5 11 11

、 9 6 12
9 10 15

、 8 10 10
5 9 10

答案：

33、【填空题】
在树结构中，树根结点没有。 [每空2分]

答案： ["前件"]

34、【填空题】
Jackson结构化程序设计方法是英国的M.Jackson提出的，它是一种面向的设计方法。 [每空2分]

答案： ["数据结构"]

35、【填空题】
面向对象的模型中，最基本的概念是对象和。 [每空2分]

答案： ["类"]

36、【填空题】
软件设计模块化的目的是。 [每空2分]

答案： ["降低复杂性"]

37、【填空题】
数据模型按不同应用层次分成3种类型，它们是概念数据模型、和物理数据模型。 [每空2分]

答案： ["逻辑数据模型"]

38、【填空题】
在Visual Basic的立即窗口内输入以下语句
X＝65
?Chr$(X)
在窗口中显示的结果是。 [每空2分]

答案： ["A"]

39、【填空题】
下列程序是判断一个整数(>=3) 是否为素数，请补充完整。
Dim n As Integer
n=InputBox("请输入一个整数(>=3) ")
k=Int(Sqr(n) )
i=2
swit=0
While i <=k And swit=0
If n Mod i=0 Then

Else

End If
Wend
If swit=0 Then
Print n; "是一个素数。"
Else
Print n; "不是一个素数。"
End If [每空2分]

答案： ["swit=0","swit=1"]

40、【填空题】
下面程序是用来打印九九乘法表的，请补充完整。
Dim i As Integer, j As Integer, Str1$
Str1=""
For i=1 To 9
For j=1 To 9
If Then
Str1=Str1 + Str$(j) + "×" + Str$(i) + "=" + Str$(Val(i j) )
Else
Str1=Str1 & Chr(13)

End If
Next j
Next i
Print Str1 [每空2分]

答案： ["j<=i","j<=i"]