（ 12 ）在窗体中添加一个名称为 Command1 的命令按钮，然后编写如下程序：

Private Sub s （ By Val p As lnteger ）

p=p*2

E．nd Sub

Private Sub Command1_Click()

D．im i As Integer

i=3

C．all s(i)

If i>4 Then i=i^2

MsgBox i

E．nd Sub

窗体打开运行后，单击命令按钮，则消息框的输出结果为 ( 12 ) 。