更多"下面程序运行后的输出结果是 Private Sub Command1"的相关试题:
[单项选择]下面程序运行后的输出结果是
Private Sub Command1_Click（ ）
For j=1 To 10
If j Mod 3＜＞0 Then a=a+j/3
Next
Print a
End Sub
A. 20
B. 10
C. 3
D. 9
[单项选择]下列程序运行后的输出结果是
Private Sub Command1_Click（ ）
For k=3 To 1 Step-1
x=String(k，"*")
Print x
Next
End Sub
[单项选择]下面程序运行后的输出结果是______。
Private Sub Command1_ Click ( )
for j = 1 To 10
if j Mod 3 ＜＞ 0 then a =a+j/3
Next j
Print a
End Sub
A. 20
B. 10
C. 3
D. 9
[单项选择]下面程序运行后的结果是( )。 Private Sub Form_Click（ ） Dim s As Integer，k As Integer,i As Integer，n As Integer s=1 fori=1 to 3 forj=i to 3 for k=j to istep-1 s=s*k nextk,J,i print s End Sub
A. 6
B. 72
C. 144
D. 432
[单项选择]下列程序运行后在立即窗口输出结果是( )。
Private Sub Form_Click（ ）
x="a":y="b"
z=1:u=2
Debug. Print x; y, z; u
Debug. Print z; x, y; u
End Sub
A. a b 1 2
B. a b 1 2
C. a b 1 2
D. a b 1 2
[单项选择]以下程序运行后输出的结果是 ______。
Option Base 1
Private Sub Form_Click（ ）
Dim A(20)
For K=1 To 20
A(K)=K^2
Next K
Print A(K)
End Sub
A. 20
B. 441
C. 400
D. 出错信息
[单项选择]下列程序段，运行后窗体上输出结果是( )。
Private Sub Command1_Click（ ）
a=5:b=4:c=3:d=2
x=3＞2*b Or a=c And b＜＞c Or c＞d
Printx
End Sub
A. 1
B. True
C. False
D. 2
[单项选择]下列程序运行后在立即窗口输出的结果是( )。
Private Sub Form_Click（ ）
x="a":y="b"
z=1:u=2
Debug.Printx;y,z;u
Debug.Printz;x,y;u
End Sub
A. a b 1 2
B. a b 1 2
C. a b 1 2
D. a b 1 2
[单项选择]以下程序运行后输出的结果是______。
Private Sub Form _Click（ ）
a=0
For j=1 To 15
a=a+j Mod 3
Next j
Print a
End Sub
A. 10
B. 15
C. 80
D. 100
[单项选择]以下程序运行后的输出结果是______。
Private Sub Form_ Click（ ）
y=1 ：x=2
Print Iif(x＞=y，x，y)
End Sub
A. 0
B. 1
C. 2
D. 3
[单项选择]下列事件过程运行后输出结果是
Private Sub Command1_Click（ ）
Print Formats(123，456，"###，##%")
End Sub
A. 123.46%
B. 123.45%
C. 123.456%
D. 12345.6%
[单项选择]下列事件过程运行后输出结果是
Private Sub Command1_Click（ ）
Print Format$(123,456，"###,##%")
End Sub
A. 123.46%
B. 123.45%
C. 123.456%
D. 12345.6%
