更多"下面程序执行的结果是______。 Private Sub Form"的相关试题:
[单项选择]下面程序执行的结果是( )。
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 Form_Click（ ）
Dim i As Integer,j As Integer
i=10
Do
i=i+j
For j=10 To i Step-3
i=i+j
Next j
Loop While i＜50
Print i;j
End Sub
A. 50 10
B. 50 9
C. 57 10
D. 57 9
[单项选择]
下面程序的执行结果是（）。
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 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 Commandl_Click（ ）
Dim a As Integer，b As Integer，c As Integer
a=3:b=4:c=5
Print SecProc(c，b，
[单项选择]下面程序运行结果是( )。 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 Commandl_Click（ ） a=1.5 b=1.5 Callfun(a,b) Printa,b End Sub Private Subfun(x,y) x=y*y y=y+x End Sub
A. 2．25 1.5
B. 1.5 2.25
C. 2.25 3.75
D. 0.75 1.5
[单项选择]单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click（ ） BT4 End Sub Private Sub BT(x As Integer) x=x * 2 + 1 If x＜6 Then Call BT(x) End If x=X * 2 Print x； End Sub
A. 15
B. 16
C. 17
D. 18
