[单项选择]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：
Private Sub Command1_Click（　）
Dim i As Integer,a As Integer
Do While i＜20
Do While True
If i Mod 10=0 Then
Exit Do
Else
i=i-1
End If
Loop
i=i+11
a=a+i
Loop
Printa
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。
A. 21
B. 32
C. 33
D. 11

更多"在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： "的相关试题:

[单项选择]在窗体上画一个命令按钮，名称为Command1。
Private Sub Command1 Click（　）
Dim x As Integer，y As Integer
x=10:y:0
Do
x=x+2:y=y+x
Print "x=", x; "y=",y
If y＞20 Then Exit Do
Loop Until x=18
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是 ______。
A. x=12y=12
B. x=12 y=12
C. x=12 y=12
D. x= 12 y=12

查看答案

[填空题]在窗体上画一个名称为Command1的命令按钮，编写如下事件过程
Private Sub Command1_Click( )
Dim a As String
a= 【11】
For i=1 To 5
Print Space(6-i)；Mid $(a，6-i，2*i-1)
Next i
End Sub
程序运行后，单击命令按钮，要求窗体上显示的输出结果为
5
456
34567
2345678
123456789
请填空。

查看答案

[单项选择]在窗体上画一个名称为Command1的命令按钮，并编写如下程序： Private Sub Command1_Click( ) Dim x As Integer Static y As Integer x=10 y=5 Call f1(x，y) Print x，y End Sub Private Sub f1(ByRef x1 As Integer，y1 As Integer) x1=x1+2 y1=y1+2 End Sub程序运行后，单击命令按钮，在窗体上显示的内容是
A. 10 5
B. 12 5
C. 10 7
D. 12 7

查看答案

[单项选择]在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub Command1_Click（　）
Static X As Integer
Static Y As Integer
Cls
Y=2
Y=Y+3
X=3+X
Print X.Y
End Sub
程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为______。
A. 3
B. 5
C. 9
D. 9

查看答案

我来回答:

提交