单项选择题

设有如下窗体单击事件过程：
Private Sub Form_Click()
a=1
For i=1 To 3
Select Case i
Case 1,3
a=a+l
Case 2,4
a=a+2
End Select
Next i
MsgBox a
End Sub
打开窗体运行后，单击窗体，则消息框的输出的结果是( )。