分页:
上一页 1 2 3 4 [5] 6 7 8 9 10 下一页
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)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
程序运行后,单击命令按钮,在窗体上输出的是
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
程序运行后,单击窗体,输出结果为
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("A") + (i - 1))
Next i
For Each b In a
Print b;
Next
End Sub
程序运行后,单击命令按钮,输出结果是
A)ABCDE B)1 2 3 4 5
C)abcde D)出错信息
(27)以下关于函数过程的叙述中,正确的是
A)如果不指明函数过程参数的类型,则该参数没有数据类型
分页:
上一页 1 2 3 4 [5] 6 7 8 9 10 下一页