[单项选择题] 有如下程序： Private Sub Form_Click() Dim i As Integer, Sum As Integer sum=0

[单项选择题] 有如下程序： 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解析：[分析]： 本题程序的功能是：将从2到10中既是奇数(i Mod 2＜＞0)又是3的倍数(i Mod 3=0)的数求和，在2到10中满足条件的数字是3，9，其和是12。