更多"下面程序段，运行后的结果是 Private Sub Commandl_"的相关试题:
[单项选择]下列程序段的运行结果是：Private Sub Command1_Click（ ） Dim n AS Integer I =21: n = 3 do while I＞n I=I- n Loop Print IEnd Sub在窗体上打印的结果是______。
A. 3
B. 5
C. 6
D. 8
[单项选择]下列程序段，运行后窗体上输出结果是( )。
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（ ） For I=3 to 1 step-1 Print Spc(10-I)； For j=1 to 2*I-1 print"*"; Next j Print Next I End Sub
A. ***** *** *
B. * *** *****
C. * *** *****
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 Print x End Sub
A. 1
B. True
C. False
D. 2
[单项选择]下面程序运行后的结果是( )。 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 Command1_Click( ) Dim a As Integer a=2 For i=1 To 3 Print G(a) Next iEnd SubFunction G(a As Integer) b=0 Static c b=b + 1 c=c + 1 G=a + b + cEnd Function运行上面的程序后，单击命令按钮，输出结果为
A. 1 2 3
B. 2 3 4
C. 4 5 6
D. 1 4 6
[单项选择]执行下面的程序段，x的值为 Private Sub Command1_Click( ) For i=1 To 5 a=a+i Next i x=Val(i) MsgBox x End Sub
A. 5
B. 6
C. 7
D. 8
[单项选择]执行下面的程序段，x的值为 Private Sub Commandl_Click（ ） For i=1 To 5 a=a+i Next i x=Val(i) MsgBox x End Sub
A. 5
B. 6
C. 7
D. 8
[单项选择]下面程序运行后的输出结果是 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
[单项选择]下面程序运行后，输出的结果是 Dim arr(3,3) For j=1 To 3 For k=1 To 3 Arr(j,k)=(j-1)*3+k Next k Next j For j=2 To 3 For j=2 To 3 Print art(k,j)； Next k Print Next j
A. 2 5 3 6
B. 5 8 6 9
C. 4 7 5 8
D. 5 9 6 8
[单项选择]下面程序运行结果是( )。 Private Sub Form_Click（ ） Dim x As Single,y As Single x=InputBox("请输入数据25"):y=InputBox("请输入数据10") Print x+y;InputBox("请输入数据25")+InputBox("请输入数据10") End Sub
A. _35_2510
B. 25102510
C. _35_35_
D. 2510_35_
[单项选择]程序段如下：Private Sub Command1_ Click（ ） a = 0 for 1=15 To 15 Step- 2 a = a +1 Next I Print a, IEnd Sub发生Command 1的单击事件后，程序的输出结果是 ______。
A. 0 13
B. 15 13
C. 0 15
D. 15 15
[单项选择]下列程序段的执行结果为 Private Sub Command1_Click（ ） a=InputBox("请输入a值") c="您要查询的是" &IIf(a＞0，"天气"，" ") &IIf(a＜0，"电话号码"，" ") &IIf(a=0，"邮编"，" ") Text1.Text=c End Sub程序运行后，如果从键盘上输入"16"，则在文本框显示的内容是______。
A. 您要查询的是天气
B. 您要查询的是邮编
C. 您要查询的是电话号码
D. False
[单项选择]下面程序运行后的输出结果是______。Private Sub Command1_ Click ( ) for j = 1 To 10 if j Mod 3 ＜＞ 0 then a =a+j/3 Next j Print aEnd Sub
A. 20
B. 10
C. 3
D. 9
[单项选择]下列事件过程运行后输出结果是 Private Sub Command1_Click（ ） Print Format$(123,456，"###,##%") End Sub
A. 123.46%
B. 123.45%
C. 123.456%
D. 12345.6%
[单项选择]下列事件过程运行后输出结果是 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（ ） For k=3 To 1 Step-1 x=String(k，"*") Print x Next End Sub
A. * * * * * *
B. 1 * 2 * 3 *
C. 3 * 2 * * 1 * * *
D. * * * * * *
