【单选题】在窗体上画一个命令按钮,其名称为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程序运行后,单击命令按钮,其输出结果是___...
【单选题】( 23 )在窗体上画一个命令按钮,其名称为 command1, 然后编写如下代码: 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 j = j * 10 Next i Print s End Sub 程序运行后,...
【单选题】在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim arr(5)As String For i=1 To 5 art(i)=Chr(Asc('A')+(i-1)) Next i For Each b1 In arr Print b1; Next End Sub 程序运行后,如果单击命令按钮...
【单选题】在窗体上画一个名称为Commandl的命令按钮。有下列程序: Option Base 1 Private Sub Command1_Click() Dim a a=Array(45,27,34,24,91,37,11,67,82,63) For i = 1 To 9 For i = i + 1 To 10 If a(i)> a(j)Then a1 = a(i) a(i) = a(j) a(j) =...
【单选题】在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim a As Integer,s As Integer a=8 s=1 Do S=s+a a=a-1 Loop While a<=0 Prim s,a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是