在窗体上画一个名为Commandl的命令按钮，然后编写如下代码：

option Base 1

Pdvate Sub Commandl_Click()

D．im a

a=Array(1，2，3，4)

J=1

F．or i=3 To 1 Step-1

s=s+a(i)*J

j=j*10

Nexti

Print s

E．nd Sub

运行上面的程序，其输出结果是

A．1234

B．12

C．34

D．4321

[单选题]在窗体上画一个命令按钮，名称为Commandl，然后编写如下代码： Option Base 0 Private Sub Commandl_Click() DimA(4)As Integer,B(4)As Integer Fork=0 To 2 A(k+1)=InputBox(“请输入一个整数”) B(3-k)=A(k+1) Nextk PrintB(k) End Sub 程序运行后，单击命令按钮，在输入对话框中分别A．0B．2C．3D．4

[单选题]在窗体上画一个名称为Commandl的命令按钮，然后编写如下代码： OpdOn Base1 Private Sub Commandl_CUck() d=0 c=10 x=Array(10,12,21,32,24) For i=1 To 5 Ifx(i)＞c Then d=d+x(i) c=X(i) Else d=d-c End If Next I Printd End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为______。A．89B．99C．23D．77

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：Option Base()Private Sub Command1_ Click() Dim A1(4) As Integer, A2(4)As Integer For k= 0 To 2 A1(k+1)=InputBox(“请输入—个整数”) A2(3-k)=A1(k+1) Next k Print A2 (k)End Sub程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为______。A．0B．1C．2

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下代码： Option Base() Private Sub Command1 Click() Dim A(4)As Integer,B(4)As Integer For k=0 To 2 A(k+1)＝InputBox(“请输入一个整数”) B(3-k)＝A(k+1) Next k Print B(k) End sub 程序运行后，单击命令按钮，在输入对话框中分别输入2、4、6，输出结果为______。A．0B．2C．3D．4

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下代码： Option Base 0 Private Sub Command1_Click() Dim Al(4) As Integer, A2(4) As Integer For k = 0 To 2 A1(k + 1) = InputBox (“请输入1个整数”) A2(3 - k) = A1(k + 1) Next k Print A2(k) End Sub程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，输出结果为___

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下代码： Option Base 1 Private Sub Command1_Click() d=0 c=10 x=Array(10，12，21，32，24) For i=1 To 5 If x(i)＞c Then d=d+x(i) c=x(i) Else d=d-c End If Next I Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为 ______。A．89B．99C．23D．77

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下代码： Option Base 1 Prirate Sub Command1_Click() d=0 c=10 x=Array(10,12,21,32,24) For i=1 To 5 If x(i)＞c Then d=d+x(i) c=x(i) Else d=d-c End If Next I Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为______。A．89B．99C．23D．77

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下代码： OPtion Base l Private Sub Commandl_Click( ) d=0 c=10 x=Array(10，12，21，32，24) For i=1 To 5 If x(i)＞c Then d=d+x(i) C=x(i) Else d=d-c End lf Next i Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为A．89B．99C．23D．77

[单选题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码： Option Base 1 Private Sub Command1_Click () Dim a a = Array(1, 2, 3, 4) j = 1 For i = 1 To 4 s = s + a(i) * j j = j * 10 Next i Print s End Sub程序运行后，单击命令按钮，其输出结果是______。A．1234B．12C．34D．4321

[单选题]在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Option Base 1 Private Sub Commandl_Click() Dim c AS Integer，d As Integer d=0 c=6 x=Array(2,4,6,8,10,12) For i=1 To 6 If x(i)＞c Then d=d+x(i) c=x(i) ElSe d=d-c End If Next Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为A．