更多"在窗体上画一个名为Command1的命令按钮，然后编写以下程序： Pr"的相关试题:
[单项选择]在窗体上画一个命令按钮，名称为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
[单项选择]在窗体上画一个名为Command1的命令按钮，然后编写以下程序：
Private Sub Command1_Click（ ）
Dim M(10)As Integer
For k=1 To 10
M(k)=12-k
Next k
x=8
Print M(2+M(x))
End Sub
运行程序，单击命令按钮，在窗体上显示的是
A. 6
B. 5
C. 7
D. 8
[单项选择]在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1_ Click（ ） Static x As Integer Static y As Integer Cls y=1 y=y+5 x=y +x Print x, yEnd Sub程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为______。
A. 15 16
B. 15 6
C. 15 15
D. 5 6
[单项选择]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_ Click（ ）Dim a As Integer, y As Integera =10: y = 0do a=a+2:y=y+ a Print "a="; a; "y=", y if y＞20 then exit doLoop until a＞14End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。
A. a=12 y=12 a=14 y=16 a=16 y=20
B. a=12 y=12 a=16 y=28 a=14 y=24
C. a=12 y=12 a=14 y=26
D. a=12 y=12 a=14 y=44
[单项选择]在窗体上画一个命令按钮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 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. 如果选项组结合到某个字段，则只有组框架本身结合到该字段，而不是组框架的复选框、选项按钮或切换按钮
B. 选项组可以设置为表达式或非结合选项组，也可以在自定义对话框中使用非结合选项组来接受用户的输入，但不能根 据输入的内容来执行相应的操作
C. 选项组是由一个组框、一个复选框、选项按钮或切换按钮和关闭按钮组成的
D. 以上说法均错
[单项选择]在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1 Click（ ） a&＝InputBox("请输入第一个数") b&=InputBox("请输入第二个数") Print b&+a& End Sub 程序运行后，单击命令按钮，在两个输入对话框中先后输入12345和54321，程序的输出结果是
A. 66666
B. 5432112345
C. 1234554321
D. 出错
[单项选择]在窗体上画一个命令按钮，然后编写下列程序： 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
