单项选择题

有如下程序:
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 i
Print sum
End Sub
程序运行后,单击窗体,输出结果为______。

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