在窗体上画一个名为Commandl的命令按钮,然后编写如下代码:option Base 1Pdvate Sub Commandl_Click()Dim aa=Array(1,2,3,4)J=1For i=3 To 1 Step-1s=s+a(i)*Jj=j*10NextiPrint sEnd Sub运行上面的程序,其输出结果是A.1234B.12C.34D.4321
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码:
option Base 1
Pdvate Sub Commandl_Click()
Dim a
a=Array(1,2,3,4)
J=1
For i=3 To 1 Step-1
s=s+a(i)*J
j=j*10
Nexti
Print s
End Sub
运行上面的程序,其输出结果是
A.1234
B.12
C.34
D.4321
相关考题:
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是A.VVVB.VisC.sicD.11
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: PrivateSubCommandl_CnCk() aS="VisualBasic", Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是( )。A.VVVB.VisC.sicD.11
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl),然后编写如下事件过程: