[选择01] 10）（新）设数据元素的集合D={1,2,3,4,5}，则满足下列关系R的数据结构中为线性结构的是（ B ） （★）
A）R={（1，3），（2，4），（3，5）} B）R={（1，3），（4，1），（3，2），（5，4）} C）R={（1，2），（2，3），（4，5）} D）R={（1，2），（3，4），（5，1）} 13．（新）下面变量定义中错误的是（ B ） （★）
A）Static buf B）Public mod As Integer C）Dim a!(-5 To -1) D）Dim ch As String*10 14．（新）如果把程序的启动对象设置为：Sub Main，则Sub Main过程（ B ） （★）
A）只能写在Form1窗体中代码的最前面 B）只能写在某个标准模块的代码中
C）可以写在任何窗体或标准模块的代码中 D）可以写在Form1窗体中代码的任何位置 17．（新）下面关于VB应用程序的叙述中正确的是（ A ） （★）
A）VB应用程序既能解释运行，也能编译运行 B）VB应用程序只能解释运行
C）VB应用程序只能编译运行 D）VB应用程序必须先编译，然后解释运行 31．（新）编写如下程序： （★★）
Private Sub Command1_Click() Dim n As Integer Static s As Integer For n = 1 To 3 s = s + n Next Print s End Sub
程序运行后，第三次单击命令按钮Command1时，输出结果为（ A ） A）18 B）9 C）6 D）3 32.（新）编写如下程序： （★★）
Private Sub Command1_Click() Dim x As Integer, y As Integer x = 10 y = 20
Call fun1(x, y) Print x; y End Sub
Private Function fun1(ByVal m As Integer, n As Integer) As Integer m = m * m n = n + n End Function
程序运行后，单击命令按钮Command1，则输出结果为（C ）
A）100 25 B）100 40 C）10 40 D）10 25 37．（新）编写如下程序： （★★）
Private Sub Command1_Click() Dim a(3, 3) As Integer
Dim i As Integer, j As Integer For i = 1 To 3 For j = 1 To 3
If i > 1 And j > 1 Then
a(i, j) = a(a(i - 1, j - 1), a(i, j - 1)) + 1 Else
a(i, j) = i * j End If Next j Next i
For i = 1 To 3 For j = 1 To 3 Print a(i, j); Next j Print Next i End Sub
程序运行后，单击命令按钮Command1，输出结果为（ B ）
A ）1 2 3 B ）1 2 3 C ）1 2 3 D ）1 2 3
2 0 0 2 3 1 2 2 2 2 1 1 3 0 0 3 2 3 3 3 3 3 1 1 38．（新）编写如下程序： （★★）
Private Sub Command1_Click() For i = 1 To 4
Print Space(12 - 3 * i); For j = 1 To i Print j; Next j
For k = i - 1 To 1 Step -1 Print k; Next k Print Next i End Sub
程序运行后，单击命令按钮Command1，输出结果为（ D ）
A）1 2 3 4 3 2 1 B） 1 C）1 1 2 3 2 1 1 2 1 1 2 1 1 2 1 1 2 3 2 1 1 2 3 2 1 1 1 2 3 4 3 2 1 1 2 3 4 3 39.（新）编写如下程序： （★★）
Dim num As Integer, r As Integer, n As Integer, i As Integer Dim arr(5) As Integer
Private Sub Command1_Click() num = 12
D） 2 1 1 1 1 2 1 2 3 2 3 4 1 2 1 3 2 1
r = 2
Call sub1(num, r, n) For i = n To 1 Step -1 Print arr(i); Next i End Sub
Sub sub1(d As Integer, r As Integer, k As Integer) k = 0
Do While d <> 0 k = k + 1
arr(k) = d Mod r d = d \\ r Loop End Sub
程序运行后，单击命令按钮Command1，输出结果为（ B ）
A）1 0 1 0 B）1 1 0 0 C）0 0 1 1 D）0 1 0 1
[选择02] 1）（新）某个工厂有若干个仓库，每个仓库存放有不同的零件，相同零件可能放在不同的仓库中。则实体仓库和零件间的联系是（ B ） （★★）
A）一对一 B）多对多 C）多对一 D）一对多 2）（新）某二叉树共有845个结点，其中叶子结点有45个，则度为1的结点数为（ A ） （★★）
A）756 B）754 C）不确定 D）400 3）（新）有三个关系R、S和T如下： （★★）
R S T A a b c e d B 1 2 3 4 3 C 2 1 1 5 2
A d c f
B 3 3 4
C 2 1 7
A c d
B 3 3
C 1 2
则由关系R和S得到关系T的操作是（ B ）
A）并 B）交 C）选择 D）差 4）（新）数据库中对概念模式内容进行说明的语言是（ C ） （★★）
A）数据控制语言 B）数据操纵语言 C）数据定义语言 5）（新）下列叙述中正确的是（ A ）? （★★）
A）循环链表是循环队列的链式存储结构
B）结点中具有多个指针域的链表称为多重链表
C）带链的栈有栈顶指针和栈底指针，因此又称为双重链表 D）有两个指针域的链表称为二叉链表 6）（新）下面对软件测试描述错误的是（ B ） （★★）
A）软件测试是保证软件质量的重要手段
B）随机地选取测试数据
C）软件测试的目的是发现错误
D）严格执行测试计划，排除测试的随意性 7）（新）结构化程序的三种基本控制结构是（ D ） （★★）
A）过程、子程序和分程序 B）调用、返回和转移 C）顺序、选择和调用
D）顺序、选择和重复（循环） 8）（新）软件需求分析阶段的主要任务是（ D ） （★★）
Ａ）确定软件开发计划 Ｂ）确定软件开发方法 Ｃ）确定软件开发工具 Ｄ）确定软件系统的功能 9）（新）下列关于算法复杂度叙述正确的是（ B ）? （★★）
A）时间复杂度与所用的计算工具无关 B）时间复杂度与采用的算法描述语言有关
C）最坏情况下的时间复杂度一定高于平均情况的时间复杂度
D）对同一个问题，采用不同的算法，则它们的时间复杂度是相同的 10）（新）设有栈S和队列Q，初始状态均为空。首先依次将A，B，C，D，E，F入栈，然后从栈中退出三个元素依次入队，再将X，Y，Z入栈后，将栈中所有元素退出并依次入队，最后将队列中所有元素退出，则退队元素的顺序为（ C ） （★★）
A）DEFZYXABC B）FEDXYZCBA C）FEDZYXCBA D）DEFXYZABC 31）（新）在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： （★）
Option Base 1
Private Sub Command1_Click() Dim a(3, 3) As Integer
Dim i As Integer, j As Integer, s As Integer s = 0
For i = LBound(a, 1) To UBound(a, 1) For j = LBound(a, 2) To UBound(a, 2) a(i, j) = (i - 1) * 3 + j If i >= j Then s = s + a(i, j) End If Next j, i Print s End Sub
程序运行时，单击Command1，则在窗体上输出的结果是（ A ）
A）34 B）19 C）26 D）15 32）（新）设有如下事件过程：
（★）
Private Sub Form_Click()
Dim f1 As Integer, f2 As Integer, i As Integer Dim s As Integer f1 = 1 f2 = 1 s = f1 + f2 For i = 1 To 3 f1 = f1 + f2 f2 = f2 + f1 s = s + f1 + f2 Next i Print s End Sub
运行程序，单击窗体，则输出结果为（ B ）
A）52 B）54 C）20 D）2 33）（新）在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： （★）
Private Sub Command1_Click() Dim x As Integer, y As Integer Dim s As String s = \
x = Int(Rnd(1)) + 100 y = Val(Left(s, 3)) Select Case x + y Case Is > 301 Print \分支1\ Case 300 To 301 Print \分支2\ Case Is < 301 Print \分支3\ End Select End Sub
程序运行时，单击Command1，则在窗体上输出的结果是（ C ）
A）分支1 B）无任何输出 C）分支2 D）分支3 34）（新）在窗体上画一个名称为Command1的命令按钮，然后编写如下程序代码： （★）
Private Sub Command1_Click() Dim a As Integer, b As Integer a = 5 b = 10
Call mysub(a, b) Print a; b End Sub
Private Sub mysub(ByRef x As Integer, y As Integer) x = x + 5 y = y * 2 End Sub