填空题

在窗体中添加一个名为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
窗体打开运行后，单击命令按钮，则消息框的输出结果为______。

点击查看答案&解析