单项选择题

设有如下窗体单击事件过程:
Private Sub Fom_Click()
a=1
For i=1 To 3
Select Case i
Case 1,3
a=a+1
Case2,4
a=a+2
End Select
Nexti
MsgBoxa
EndSub
打开窗体运行后,单击窗体,则消息框的输出的结果是

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