[单项选择题] 有如下程序： Private Sub Form

[单项选择题] 有如下程序：

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

Print Sum

End Sub

程序运行后，单击窗体，输出结果为

A．12

B．30

C．24

D．18

A

本题考查额是For循环语句和If条件语句的应用。纵观本题可以看出，本题程序段的作用是将从2到10中不是2的倍数但是3的倍数的数加和然后输出。在2到10中满足条件的数字是3和9所以和是12。