现有如下一段程序: Option Base 1 Private Sub Command1_Click() Dim a a = Array(1,3,5,7) x = 1 For i = 4 To 1 Step -1 s = s + a(i)* x x = x * 10 Next Print s End Sub 执行该程序,单击Command1命令按钮,窗体上输出的结果是________。
A. 7531
B. 57
C. 13
D. 1357
查看答案
在窗体上放置一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() Dim x(1 To 5)As Integer For k = 1 To 5 x(k)= 10 - k Next k Print x(x(k - 3)- 3) End Sub 运行程序后,单击命令按钮,输出结果是________。
A. 6
B. 9
C. 5
D. 7
运行下列程序,单击命令按钮,输出结果是________。 Private Sub Form_Click() Dim a a = Array(1,2,3,4,5,6) For i = LBound(a)To UBound(a) a(i)=a(i)* a(i) Next i Print a(i) End Sub
A. 36
B. 0
C. 不确定
D. 程序出错
在窗体上放置一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() Dim a(5)As String For i = 1 To 5 a(i)= Chr(Asc("A")+ 2 * i - 2) Next i For Each b In a Print b; Next End Sub 运行程序后,单击命令按钮,输出结果是________。
ABCDE
B. 出错信息
C. 1 2 3 4 5
D. ACEGI
在模块的通用声明部分使用 “Option Base 1”语句,在某过程中使用“Dim a(-1 To 5, 10) As Integer” 语句声明的数组的元素个数为( )。
A. 50
B. 70
C. 80
D. 60