[单选题]

有如下程序： 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

有如下程序： 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．12B．30C．24D．18