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

【正确答案】 A

【答案解析】[解析] 题中i mod 2＜＞0表示i为奇数；i mod 3=0表示i是3的倍数。2—10中是3倍数的奇数只有3和9，所以求和答案为12。