单项选择题

在窗体上画一个命令按钮，然后编写如下事件过程：
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
i = j * 10
Next i
Print s
End Sub
运行上面的程序，单击命令按钮，其输出结果为

A．4321
B．12
C．34
D．1234
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer，y As Integer x = 41： y = 54 Call sub1(x，y) x = x + 1 Print x； y End Sub Private Sub sub1(n As Integer， ByVal m As Integer) n=n Mod 10 m=m 10 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．41 54
B．2 54
C．1 3
D．42 3
单项选择题
在窗体上画一个命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1 Click() Dim Arr1(12)As Integer， Arr2(3)As Integer Dim Sum As Integer Sum = 2 For i=1 To 12 Arrl(i)= i Next i For i=1 To 3 Arr2(i)= Arrl(i*i) Next i For i = 1 To 3 Sum = Sum + Arr2(i) Next i Print Sum End Sub 程序运行后，单击命令按钮，在窗体上的输出结果为
A．16
B．24
C．32
D．36
相关试题