单选题 有如下程序：
Private Sub Form_Click()
Dimi As Integer,sumASInteger
sum=0
For i=2To 10
If i Mod2＜＞0 And i Mod 3=0 Then
sum=sum+i
End If
Nexti
Print sum
EndSub
程序运行后，单击窗体，输出结果为( )。
A．12 B．30 C．24 D．18