单项选择题

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

A.3
B.4
C.6
D.7