更多"在窗体上画一个命令按钮，然后编写下列程序：
Private Su"的相关试题:
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click（ ） a=InputBox("请输入一个整数") b=InputBox("请输入一个整数") Print a+b End Sub 程序运行后，单击命令按钮，在输入对话框中分别输入37和18，输出结果为
A. 3718
B. 55
C. 0
D. a+b
[单项选择]在窗体上画一个命令按钮，然后编写下列程序：
Private Sub Command1 click( )
Dim a As Single，b As Single
a=6:b=2
RC a，b
Print a，b
End Sub
Sub RC(x As Single，y As Single)
i=x
x=i/y
y=i Mod y
End Sub
程序运行后，输出的结果为( )。
A. 4 3
B. 1 1
C. 3 0
D. 2 6
[单项选择]在窗体上画一个命令按钮，名称为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 x = 14 y = 16 x=16 y=18
B. x=12 y=12 x= 16 y =28 x= 18 y=24
C. x=12 y=12 x= 14 y=44
D. x= 12 y=12 x= 14 y=26
[单项选择]
在窗体上画1个命令按钮，并编写如下事件过程：
Private Sub Command1_Click（ ）
Dim a(3,3)
For m=1 To 3
For n=1 To 3
If n=m Or n=4-m Then
a(m,n)=0
End If
Print a(m,n);
Next n
Print
Next m
End Sub
运行程序，单击命令按钮，窗体上显示的内容为（）
A. 2 0 0 0 4 0 0 0 6
B. 2 0 4 0 4 0 4 0 6
C. 2 3 0 3 4 0 0 0 6
D. 2 0 0 0 4 5 0 5 6
[单项选择]在窗体上画一个命令按钮Command1，然后编写如下代码： Private Sub Command1_Click（ ） Dim Arr1(10) As Integer, Arr2(10)As Integer n=3 For i = 1 To 5 Arr1 (i)=i Arr2(n)=2 * n+i Next i Print Arr2(n); Art1 (n)End Sub运行程序后，单击命令按钮，输出结果是( )。
A. 11 3
B. 3 11
C. 13 3
D. 3 13
[单项选择]在窗体上有一个命令按钮，然后编写如下事件过程。 Private Sub Command1_Click（ ） Dim a(5)As String FOR i=1 To 5 a(i)=Chr(Asc("A")+(i-1)) Next For Each b h a Print b； Next End Sub 程序运行后，单击命令按钮，输出结果是
A. ABCDE
B. 1 2 3 4 5
C. abcde
D. 出错信息
