题目内容:
有如下程序:
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
参考答案:
答案解析:
有如下程序:
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