单项选择题

有如下程序: Private Sub Form_Click() Dim i As Integer,Sum As Integer   Sum=0   For i=2 To 10      If i Mod 2<>0 And i Mod 3=0 Then      Sum=Sum+i     End If   Next   Print Sum End Sub 程序运行后,单击窗体,输出结果为

A.12
B.30
C.24
D.18