单选题
有如下程序:
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
B
C
D
【正确答案】
A
【答案解析】
[解析] 本题考查的是For循环语句和If条件语句的应用。从本题可以看出,本题程序段的作用是将2~10中不是2的倍数但是3的倍数的数相加然后输出。在2~10中满足条件的数字是3和9,所以和是12。
提交答案
关闭