[单项选择题] 有如下程序: 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。问题解析:
解析无

![[单项选择题] 有如下程序: Private Sub Form_Click() Dim i As Integer, Sum As Integer sum=0 For i=2 To 10 If i [单项选择题] 有如下程序: Private Sub Form_Click() Dim i As Integer, Sum As Integer sum=0 For i=2 To 10 If i](http://www.mshxw.com/aiimages/31/261618.png)
