更多"在窗体中添加一命令按钮,并在命令按钮中编写如下代码: Private"的相关试题:
[填空题]在窗体中添加一个命令按钮,然后编写如下代码:
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】 。
[单项选择]在窗体中添加一个命令按钮,然后编写如下代码:
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( )
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
打开窗体后,单击命令按钮,消息框的输出结果是______。
[填空题]在窗体中添加一个名称为 Command1 的命令按钮,然后编写如下程序:
Private Sub s(ByVal p As Integer)
p = p * 2
End Sub
Private Sub Command1_Click( ) Dim i As Integer
i = 3
Call s(i)
If i > 4 Then i = i ^ 2
MsgBox i
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为__________ 。
[单项选择]在窗体中添加一个命令按钮,编写如下程序:
Private Sub Sub1(p,m,n)
p=p+1:m=m+1:n=n+1
Print "sub1:";p;m;n
End Sub
Private Sub Command1_Click( )
a1=1:b=2:c1=3
Call Sub1(a,b1+3,c1)
Print"Main:";a1;b1;c1
End Sub
程序运行后,输出结果为
[填空题]在窗体上添加一个命令按钮,编写如下事件过程:
Private Sub Command1_Click( )
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
运行窗体后,单击命令按钮,消息框的输出结果是______。
[填空题]在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub s(ByVal p As Integer)
p=p*2
End Sub
Private Sub Command1_Click( )
Dim i As Integer
i=3
Call s(i)
If i>4 Then i=i^2
MsgBox i
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为 【12】 。
[填空题]在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub f(ByVal x As Integer)
x=x+4
End Sub
Private Sub Command1_Click( )
i=3
Call f(i)
If i>4 Then i=i*2
MsgBox i
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
[单项选择]在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码:
Private Sub Command1_Click( )
a=75
If a>60 Then
g=1
Elself a>70 Then
g=2
Elself a>80 Then
g=3
Elself a>90 Then
g=4
End If
MsgBox g
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果是( )。
A. 1
B. 2
C. 3
D. 4