【单选题】在窗体上画一个名称为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 程序运行后,单击命令按钮,则窗体上显示的内容是