更多"在窗体中添加一个命令按钮,并编写如下程序:Private Sub Co"的相关试题:
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Commandl Click( )
Dim a( )
a=Array(1,3,5,7)
s=0
For i=1 To 3
S=S*10+a(i)
Next i
Print s
End Sub
程序运行后,输出结果为( )。
A. 135
B. 357
C. 531
D. 753
[单项选择]在窗体上画一个命令按钮,然后编写如下代码:
Private Sub Command1 Click( )
a&=InputBox("请输入第一个数")
b&=InputBox("请输入第二个数")
Print b&+a&
End Sub
程序运行后,单击命令按钮,在两个输入对话框中先后输入12345和54321,程序的输出结果是
A. 66666
B. 5432112345
C. 1234554321
D. 出错
[单项选择]在窗体上画一个命令按钮,然后编写下列程序:
Private Sub Command12_Click( )
Tt 3
End Sub
Sub Tt(a As Integer)
Static X As Integer
X=X * a + 1
Print x;
End Sub
连续三次单击命令按钮,输出的结果是
A. 1 5 8
B. 1 4 13
C. 3 7 4
D. 2 4 8
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Dim a( )
a=Array(1,3,5,7)
s=0
For i=1 To 3
s=s*10+a(i)
Next i
Print s
End Sub
程序运行后,输出结果为( )。
A. 135
B. 357
C. 531
D. 753
[单项选择]在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码:
Private Sub Command1_Click( )
k = 0
Do While k < 70
k = k + 2
k = k * k + k
a = a + k
Loop
Text1.Text = a
End Sub
程序运行后,文本框中显示________。
A. 20
B. 32
C. 44
D. 78
[单项选择]在窗体中添加一个命令按钮,名称为Commandl,然后编写如下程序:
Private Sub Command1_Click( )
Dim a As Integer,b As String,C As Integer
a = 1234 : b = Str(
[单项选择]在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1_Click( )
Dim a As Integer, b As String, c As Integer
a=1234: b=Str(
[单项选择]在窗体中添加一个命令按钮(名为Command1),然后编写如下代码:
Private Sub Command1 Click( )
a=0:b=5:C=6
MSgBOx a=b+c
End Sub
窗体打开运行后,如果单击命令按钮,则消息框的输出结果是______。
A. 11
B. a=11
C. 0
D. False
[单项选择]在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码:
Private Sub Command1_Click( )
a=3:b=4:c=5
MsgBox a=b+c
End Sub
窗体打开运行后,如果单击命令按钮,则消息框的输出结果为( )。
A. 0
B. 9
C. a=9
D. False