在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:Private Sub s(ByVal p As Integer)p=p*2End SubPrivate Sub Command1_click()Dim i As Integeri=3Call s(i)If i>4 Then i=i^2MsgBox iEnd 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
窗体打开运行后,单击命令按钮,则消息框的输出结果为【 】。
相关考题:
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_Click()Dim s,iFor i=1 To 10s=s+iNext iMsgBox sEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为 。
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_Click()sum=0For i=1 To 100 step 2Next iMsgBox sumEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
在窗体中添加一个名为Command1的命令按钮,然后编写如下程序:Private Sub s(By Val p As Integer)p=p*2End SubPrirate Sub Command1_Click( )Dim i As Integeri=3Call s(i)If i>4 Then i=i^2MsgBox IEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
( 11 )在窗体中添加一个命令按钮,名称为 Command1 ,然后编写如下程序:Private Sub Command1_Click()Dim s , iFor i=1 To 10s=s+iNext iMsgBox sEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为 【 11 】 。
( 12 )在窗体中添加一个名称为 Command1 的命令按钮,然后编写如下程序:Private Sub s ( By Val p As lnteger )p=p*2End SubPrivate Sub Command1_Click()Dim i As Integeri=3Call s(i)If i4 Then i=i^2MsgBox iEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为 【 12 】 。