2009年3月全国计算机等级考试二级VB语言程序设计-在线考试系统

1、【单选题】
下列叙述中正确的是（）。 [2分]

、栈是“先进先出”的线性表

、队列是“先进后出”的线性表

、循环队列是非线性结构

、有序线性表既可以采用顺序存储结构，也可以采用链式存储结构

答案：

2、【单选题】
支持子程序调用的数据结构是（）。 [2分]

、栈

、树

、队列

、二叉树

答案：

3、【单选题】
某二叉树有5个度为2的结点，则该二叉树中的叶子结点数是（）。 [2分]

、 10

、 8

、 6

、 4

答案：

4、【单选题】
下列排序方法中，最坏情况下比较次数最少的是（）。 [2分]

、冒泡排序

、简单选择排序

、直接插入排序

、堆排序

答案：

5、【单选题】
软件按功能可以分为：应用软件、系统软件和支撑软件（或工具软件）。下面属于应用软件的是（）。 [2分]

、编译程序

、操作系统

、教务管理系统

、汇编程序

答案：

6、【单选题】
下面叙述中错误的是（）。 [2分]

、软件测试的目的是发现错误并改正错误

、对被调试的程序进行“错误定位”是程序调试的必要步骤

、程序调试通常也称为Debug

、软件测试应严格执行测试计划，排除测试的随意性

答案：

7、【单选题】
耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是（）。 [2分]

、提高耦合性降低内聚性有利于提高模块的独立性

、降低耦合性提高内聚性有利于提高模块的独立性

、耦合性是指一个模块内部各个元素间彼此结合的紧密程度

、内聚性是指模块间互相连接的紧密程度

答案：

8、【单选题】
数据库应用系统中的核心问题是（）。 [2分]

、数据库设计

、数据库系统设计

、数据库维护

、数据库管理员培训

答案：

9、【单选题】
有两个关系R，S如下：
　

　
由关系R通过运算得到关系S，则所使用的运算为（）。 [2分]

、选择

、投影

、插入

、连接

答案：

10、【单选题】
将E-R图转换为关系模式时，实体和联系都可以表示为（）。 [2分]

、属性

、键

、关系

、域

答案：

11、【单选题】
执行语句Dim X, Y As Integer后，（）。 [2分]

、 X和Y均被定义为整型变量

、 X和Y均被定义为变体类型变量

、 X被定义为整型变量，Y被定义为变体类型变量

、 X被定义为变体类型变量，Y被定义为整型变量

答案：

12、【单选题】
以下关系表达式中，其值为True的是（）。 [2分]

、 "XYZ">"XYz"

、 "VisualBasic" <> "visualbasic"

、 "the" = "there"

、 "Integer" < "Int"

答案：

13、【单选题】
执行以下程序段
a$ = "Visual Basic Programming"
b$ = "C++"
c$ = UCase(Left$(a$,7)) & b$ & Right$(a$,12)
后，变量c$的值为（）。 [2分]

、 Visual BASIC Programming

、 VISUAL C++ Programming

、 Visual C++ Programming

、 VISUAL BASIC Programming

答案：

14、【单选题】
下列叙述中正确的是（）。 [2分]

、 MsgBox语句的返回值是一个整数

、执行MsgBox语句并出现信息框后，不用关闭信息框即可执行其他操作

、 MsgBox语句的第一个参数不能省略

、如果省略MsgBox语句的第三个参数（Title），则信息框的标题为空

答案：

15、【单选题】
在窗体上画一个文本框（名称为Text1）和一个标签（名称为Label1），程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是（）。 [2分]

、 Private Sub Text1_Change()
Label1.Caption = Str(Len(Text1.Text))
End Sub

、 Private Sub Textl_Click()
Label1.Caption = str(Len(Text1.Text))
End Sub

、 Private Sub Textl_Change()
Label1.Caption = Text1.Text
End Sub

、 Private Sub Label1_Change()
Label1.Caption = Str(Len(Text1.Text))
End Sub

答案：

16、【单选题】
在窗体上画两个单选按钮（名称分别为Optionl、Option2，标题分别为“宋体”和“黑体”）、1个复选框（名称为Checkl，标题为“粗体”）和1个文本框（名称为Textl，Text属性为“改变文字字体”），窗体外观如图所示。程序运行后，要求“宋体”单选按钮和“粗体”复选框被选中，则以下能够实现上述操作的语句序列是（）。
　

　 [2分]

、 Optionl.Value = False
Checkl.Value = True

、 Optionl.Value = True
Checkl.Value = 0

、 Option2.Value = False
Checkl.Value = 2

、 Optionl.Value = True
Checkl.Value = 1

答案：

17、【单选题】
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
c=1234
c1=Trim（Str（c））
For i=1 To 4
Print __________
Next
End Sub
程序运行后，单击命令按钮，要求在窗体上显示如下内容：
1
12
123
1234
则在横线处应填入的内容为（）。 [2分]

、 Right(c1,i)

、 Left(c1,i)

、 Mid(c1,i,1)

、 Mid(c1,i,i)

答案：

18、【单选题】
假定有以下程序段
For i=1 To 3
For j=5 To 1 Step -1
Print i*j
Next j
Next i
则语句Print i * j的执行次数是（）。 [2分]

、 15

、 16

、 17

、 18

答案：

19、【单选题】
在窗体上画两个文本框（名称分别为Textl和Text2）和一个命令按钮（名称为Command1），然后编写如下事件过程：
Private Sub Command1_Click()
x=0
Do While x<50
x=(x+2) * (x+3)
n=n+1
Loop
Textl.Text=Str(n)
Text2.Text=Str(x)
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）。 [2分]

、 1和0

、 2和72

、 3和50

、 4和168

答案：

20、【单选题】
阅读程序：
Private Sub Form_Click()
a=0
For j=1 To 15
a=a+j Mod 3
Next j
Print a
End Sub
程序运行后，单击窗体，输出结果是（）。 [2分]

、 105

、 1

、 120

、 15

答案：

21、【单选题】
以下说法中正确的是（）。 [2分]

、当焦点在某个控件上时，按下一个字母键，就会执行该控件的KeyPress事件过程

、因为窗体不接受焦点，所以窗体不存在自己的KeyPress事件过程

、若按下的键相同，KeyPress事件过程中的KeyAscii参数与KeyDown事件过程中的KeyCode参数的值也相同

、在KeyPress事件过程中，KeyAscii参数可以省略

答案：

22、【单选题】
语句Dim a(-3 To 4,3 To 6)As Integer定义的数组的元素个数是（）。 [2分]

、 18

、 28

、 21

、 32

答案：

23、【单选题】
在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
j=1
For i=4 To 1 Step -1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
程序运行后，单击命令按钮，其输出结果是（）。 [2分]

、 4321

、 1234

、 34

、 12

答案：

24、【单选题】
假定通过复制、粘贴操作建立了一个命令按钮数组Command1，以下说法中错误的是（）。 [2分]

、数组中每个命令按钮的名称（Name属性）均为Command1

、若未做修改，数组中每个命令按钮的大小都一样

、数组中各个命令按钮使用同一个Click事件过程

、数组中每个命令按钮的Index属性值都相同

答案：

25、【单选题】
在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：
Option Base 0
Private Sub Command1_Click()
Dim A1 (4) As Integer, A2 (4) As Integer
For k=0 To 2
A1 (k+1) = InputBox("请输入一个整数")
A2 (3-k) = A1(k+1)
Next k
Print A2(k)
End Sub
程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为（）。 [2分]

、 0

、 1

、 2

、 3

答案：

26、【单选题】
以下关于函数过程的叙述中，正确的是（）。 [2分]

、函数过程形参的类型与函数返回值的类型没有关系

、在函数过程中，过程的返回值可以有多个

、当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递

、如果不指明函数过程参数的类型，则该参数没有数据类型

答案：

27、【单选题】
在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序：
Private Sub func(L As Label)
L.Caption="1234"
End Sub
Private Sub Form_Load()
Label1.Caption="ABCDE"
Label2.Caption=10
End Sub
Private Sub Command1_Click()
a=Val(Label2.Caption)
Call func(Label1)
Label2.Caption=a
End Sub
程序运行后，单击命令按钮，则在两个标签中显示的内容分别为 [2分]

、 ABCD和10

、 1234和100

、 ABCD和100

、 1234和10

答案：

28、【单选题】
在窗体上画一个命令按钮（名称为Command1），并编写如下代码：
Function Funl (ByVal a As Integer, b As Integer) As Integer
Dim t As Integer
t=a-b
b=t+a
Funl=t+b
End Function
Private Sub Command1_Click()
Dim x As Integer
x=10
Print Funl (Funl (x, (Funl (x, x-1))), x-1)
End Sub
程序运行后，单击命令按钮，输出结果是（）。 [2分]

、 10

、 0

、 11

、 21

答案：

29、【单选题】
以下关于过程及过程参数的描述中，错误的是（）。 [2分]

、过程的参数可以是控件名称

、调用过程时使用的实参的个数应与过程形参的个数相同

、只有函数过程能够将过程中处理的信息返回到调用程序中

、窗体可以作为过程的参数

答案：

30、【单选题】
设有如下通用过程：
Public Function Fun (xStr As String) As String
Dim tStr As String, strL As Integer
tStr=""
strL=Len (xStr)
i=strL/2
Do While i<=StrL
tStr=tStr & Mid (xStr,i+1,1)
i=i+1
Loop
Fun=tStr & tStr
End Function
在窗体上画一个名称为Textl的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程：
Private Sub Command1_Click()
Dim S1 As String
S1="ABCDEF"
Textl.Text=LCase(Fun(S1))
End Sub
程序运行后，单击命令按钮，文本框中显示的是（）。 [2分]

、 ABCDEF

、 abcdef

、 defdef

、 defabc

答案：

31、【单选题】
在窗体上画一个命令按钮和一个文本框（名称分别为Command1和Textl），并把窗体的KeyPreview属性设置为True，然后编写如下代码：
Dim SaveAll As String
Private Sub Form_Load()
Show
Textl.Text=""
Textl.SetFocus
End Sub
Private Sub Command1_Click()
Textl.Text=LCase (SaveAll) +SaveAl1
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后，直接用键盘输入：VB，再单击命令按钮，则文本框中显示的内容为（）。 [2分]

、 vbVB

、不显示任何信息

、 VB

、出错

答案：

32、【单选题】
设有以下程序：
Private Sub Form_Click()
x=50
For i=1 To 4
y=InputBox("请输入一个整数")
y=Val(y)
If y Mod 5 = 0 Then
a=a+y
x=y
Else
a=a+x
End If
Next i
Print a
End Sub
程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为（）。 [2分]

、 100

、 50

、 120

、 70

答案：

33、【单选题】
以下关于菜单的叙述中，错误的是（）。 [2分]

、当窗体为活动窗体时，用Ctrl+E键可以打开菜单编辑器

、把菜单项的Enabled属性设置为False，则可删除该菜单项

、弹出式菜单在菜单编辑器中设计

、程序运行时，利用控件数组可以实现菜单项的增加或减少

答案：

34、【单选题】
以下叙述中错误的是（）。 [2分]

、在程序运行时，通用对话框控件是不可见的

、调用同一个通用对话框控件的不同方法（如ShowOpen或ShowSave）可以打开不同的对话框窗口

、调用通用对话框控件的Show()pen方法，能够直接打开在该通用对话框中指定的文件

、调用通用对话框控件的ShowColor方法，可以打开颜色对话框窗口

答案：

35、【单选题】
设在工程文件中有一个标准模块，其中定义了如下记录类型：
Type Books
Name As String * 10
TelNum As String * 20
End Type
在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是（）。 [2分]

、 Private Sub Command1_Click()
Dim B AS Books
Open "Person.txt" For Output As #1
B．Name=InputBox ("输入姓名")
B．TelNum=InputBox ("输入电话号码")
Write #1, B.Name, B.TelNum
Close #1
End Sub

、 Private Sub Command1_Click()
Dim B As Books
Open "Person.txt" For Input As #1
B．Name=InputBox ("输入姓名")
B．TelNum=InputBox ("输入电话号码")
Print #1, B.Name, B.TelNure
Close #1
End Sub

、 Private Sub Command1_Click()
Dim B AS Books
Open "Person.txt" For Output As #1
B．Name=InputBox ("输入姓名")
B．TelNum=InputBox ("输入电话号码")
Write #1, B
Close #1
End Sub

、 Private Sub Command1_Click()
Open "Person.txt" For Input As #1
Name=InputBox ("输入姓名")
TelNum=InputBox ("输入电话号码")
Print #1, Name, TelNum
Close #1
End Sub

答案：

36、【填空题】
假设用一个长度为50的数组（数组元素的下标从0到49）作为栈的存储空间，栈底指针bottom指向栈底元素，栈顶指针top指向栈顶元素，如果bottom=49，top=30数组下标），则栈中具有个元素。 [每空2分]

答案： ["19"]

37、【填空题】
软件测试可分为白盒测试和黑盒测试。基本路径测试属于测试。 [每空2分]

答案： ["白盒"]

38、【填空题】
符合结构化原则的三种基本控制结构是：选择结构、循环结构和。 [每空2分]

答案： ["顺序结构"]

39、【填空题】
数据库系统的核心是。 [每空2分]

答案： ["数据库管理系统"]

40、【填空题】
在E-R图中，图形包括矩形框、菱形框、椭圆框。其中表示实体联系的是框。 [每空2分]

答案： ["菱形"]