【单选题】

有如下程序：

Private Sub Form_Click( )
Dim iAs Integer, SumAs Integer
Sum = 0
For i = 2 To 10
If i Mod 2＜ ＞0And i Mod 3=0 Then
Sum = Sum + i
End If
Next
Print Sum
End Sub
程序运行后，单击窗体，输出结果为
A．12
B．30
C．24
D．18