更多"执行下面的程序,输出的结果是 ______ 。 Private "的相关试题:
[单项选择]下面程序执行时,输出的结果是( )。 Private Sub Form_Click( ) DimiASInteger,j As Integer i=10 Do i=i+j forj=10 toistep-3 i=i+j nextj Loop Whilei<50 Printi;j End Sub
A. 50 10
B. 50 9
C. 57 10
D. 59 9
[单项选择]下面程序运行后的输出结果是 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 Cotomand1_Click( ) Ch$="Welcome Home!" a=Len(ch$) For i= 1 To a b$ = Mid(ch$, i 1) If b$ = "m" Then m = m + 1 Next 1 Print m End Sub
A. 2
B. 3
C. 1
D. 0
[单项选择]单击命令按钮执行下列程序,其输出结果是( )。
Private Sub Command1_Click( )
Dim a As Integer,b As Integer,c As Integer
a=3
b=4
c=5
Prim SecProc(c,b,
A.
[单项选择]
下面程序运行时,若输入395,则输出结果是()
Private Sub Comand1_Click( )
Dim x%
x=InputBox("请输入一个3位整数")
Print x Mod 10,x/100,(x Mod 100)/10
End Sub
A. 3 9 5
B. 5 3 9
C. 5 9 3
D. 3 5 9
[单项选择]下面程序执行的结果是( )。 Private Sub Form_Click( ) AS="123":B$="456" C=Val(A$)+Val(B$) Print C/100 End Sub
A. 123
B. 3
C. 5
D. 579
[单项选择]下面程序运行后的输出结果是______。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 Form_ Click( ) A$=“123”:B$=“456” C=Val(A$)+Val(B$) Print C/100 End Sub
A. 123
B. 3
C. 5
D. 579
[单项选择]
下面程序的执行结果是()。
Private Sub Command1_Click( )
a=10
For k=1 To 5 Step-1
a=a-k
Next k
Print a; k
End Sub
A. -5 6
B. -5 -5
C. 10 0
D. 10 1
[单项选择]下列命令按钮的事件过程执行后,输出的结果是 Private Sub command1_click( ) For m=1 To 10 Step 2 a=10 For n=1 To 10 Srep 2 a=a+2 Next Next Print a End Sub
A. 60
B. 50
C. 30
D. 20
[单项选择]下列程序运行时输出的结果是 Private Sub Form_Click( ) Dim x x=Array(“天天向上”,“清华大学”,“天上人间”,“程序设计”) For i=LBound(a,1)to UBound(a,1) If Left(a(i),1)=“天”Then Print a(i); Next End Sub
A. 天天向上
B. 天天向上天上人间
C. 出错信息
D. 天天向上清华大学天上人间程序设计
[单项选择]下列程序运行后的输出结果是
Private Sub Command1_Click( )
For k=3 To 1 Step-1
x=String(k,"*")
Print x
Next
End Sub