6．下列程序的运行结果是

提问：6．下列程序的运行结果是

6．下列程序的运行结果是：Private Sub Command0_Click() Dim s As Integer s = 0 For i = 1 To 10 If i Mod 6 = 0 Then Exit For Else If i Mod 3 = 0 Then s = s + i End If Next iMsgBox sEnd Sub

网友回答：

程序有语法错，不可能有结果

    Else  If  i Mod 3 = 0  Then

正确的可能是

    ElseIf  i Mod 3 = 0  Then

那么程序的结果为

3

当 i为3时s = s + i=0+3=3

然后到i为6时，   Exit  For退出循环了