9月全国计算机等级考试二级VB语言笔试试题及答案

程序运行后,单击窗体,输出结果为 A 。 A.12 B.30 C.24 D.18

(23)在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:

Private Sub Command1_Click() Dim array1(10, 10) As Integer Dim i As Integer, j As Integer For i = 1 To 3 For j = 2 To 4

array1(i, j) = i + j Next j Next i

Text1.Text = array1(2, 3) + array1(3, 4) End Sub

程序运行后,单击命令按钮,在文本框中显示的值是 A 。 A.12 B.13 C.14 D.15

(24)在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim a1(4, 4), a2(4, 4) For i = 1 To 4 For j = 1 To 4 a1(i, j) = i + j

a2(i, j) = a1(i, j) + i + j Next j Next i

Print a1(3, 3); a2(3, 3) End Sub

程序运行后,单击命令按钮,在窗体上输出的是 D 。 A.6 6 B.10 5 C.7 21 D.6 12

(25)有如下程序: Option Base 1

Private Sub Form_Click() Dim arr, Sum Sum = 0

arr = Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i = 1 To 10

If arr(i) / 3 = arr(i) \\ 3 Then Sum = Sum + arr(i) End If Next i Print Sum

End Sub

程序运行后,单击窗体,输出结果为 C 。 A.25 B.26 C.27 D.28

(26)在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5) As String For i = 1 To 5

a(i) = Chr(Asc(\ Next i

For Each b In a Print b; Next End Sub

程序运行后,单击命令按钮,输出结果是 A 。 A.ABCDE B.1 2 3 4 5 C.abcde D.出错信息

(27)以下关于函数过程的叙述中,正确的是 D 。 A.如果不指明函数过程参数的类型,则该参数没有数据类型 B.函数过程的返回值可以有多个

C.当数组作为函数过程的参数时,既能以传值方式传递,也能以引用方式传递 D.函数过程形参的类型与函数返回值的类型没有关系

(28)函数过程F1的功能是:如果参数b为奇数,则返回值为1,否则返回值为0。以下能正确实现上述功能的代码是 B 。 A.Function F1(b As Integer)

If b Mod 2 = 0 Then Return 0 Else

Return 1 End If End Function

B.Function F1(b As Integer)

If

>>灞曞紑鍏ㄦ枃<<
12@gma联系客服:779662525#qq.com(#替换为@)