更多"在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: "的相关试题:
[填空题]在窗体中添加一个名为Command1的命令按钮,然后编写如下程序:
Private Sub s(By Val p As Integer)
p=p*2
End Sub
Prirate Sub Command1_Click( )
Dim i As Integer
i=3
Call s(i)
If i>4 Then i=i^2
MsgBox i
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
[单项选择]在窗体中添加一个名为Command1的命令按钮,然后编写如下事件代码:
Private Sub Command1_Click( )
a=75
If a>60 Then
k=1
ElseIf a>70 Then
k=2
ElseIf a>80 Then
k=3
ElseIf a>90 Then
k=4
EndIf
MsgBOx k
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果是______。
A. 1
B. 2
C. 3
D. 4
[填空题]在窗体中添加一个名为Command1的命令按钮,然后编写如下程序:
Private Sub s(By Val p As Integer)
p=p*2
End Sub
Prirate Sub Command1_Click( )
Dim i As Integer
i=3
Call s(i)
If i>4 Then i=i^2
MsgBox i
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
[填空题]单击窗体上的命令按钮Command1, 【10】
Private Sub Command1_Click( )
a= "10"
b=20
c=Val(a) +b
Print c
End Sub
[单项选择]在窗体上画一个命令按钮,名称为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( )
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
[单项选择]在窗体中添加一个命令按钮,然后编写如下代码: Private Sub Command1_Click( ) For i=l To 4 x=4 For j=1 To 3 x=3 For k=l To 3 x=x+6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,输出结果是
A. 7
B. 15
C. 21
D. 538
[填空题]在窗体中添加一个命令按钮,然后编写如下代码:
Private Sub Command1_Click( )
a=InputBox("请输入一个整数")
b=InputBox("请输入一个整数")
Print Val(a)+Val(b)
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入21和45,输出结果为 【10】 。
[填空题]在窗体中添加一个命令按钮,然后编写如下代码:
Private Sub Command1_Click( )
a=InputBox("请输入一个整数")
b=InputBox("请输入一个整数")
Print Val(a)+Val(b)
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入21和45,输出结果为 【10】 。
[填空题]在窗体上添加一个命令按钮Command1,然后编写如下事件过程。
Private Sub Command1_Click( )
Dim b,k
For k=1 To 6
b=23+k
Next k
MsgBox k+b
End Sub
打开窗体后,单击命令按钮,消息框数据的结果是______。
[填空题]在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
[填空题]在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Sum =0
For i=3 T0 7
Sum =i+2
Next i
MsgBox sum+i
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
[单项选择]在窗体上添加如下命令按纽,然后编写如下事件过程:
Private Sub Command1_Click( )
Dim a(10)As Integer
Dim p(3)As Integer
k= 5
For i = 1 To 10
a(i) = i
Next i
For i = 1 To 3
p(i) = a(i * i)
Next i
For i = 1 To 3
k = k + p(i) * 2
Next i
Print k
End Sub
该过程的运行结果为______。
A. 35
B. 33
C. 31
D. 29
[填空题]单击窗体上的命令按钮Command1,______
Private Sub Command1_Click( )
a= "10"
b=20
c=Val(a) +b
Print c
End Sub