不知有谁能够详细的解释一下这个意思啊。谢谢了。内容如下：Private Sub Form_Click() Dim i, n, sum As Integer For i = 1 To 5 For n = 1 To 100
sum = sum + n Next nsum = sum + i Next i Print sumEnd Sub还有一个和它差不多了，如下：Private Sub Form_Click() Dim i, n, sum As Integer For i = 1 To 5 For n = 1 To 100
sum = sum + n Next nsum = sum + iIf sum > 10000 Then Exit For Next i Print sumEnd Sub谢谢各位了，最好解释很清楚，虽然，那些格式我知道一些，不过，具体情况具体分析，我实在有点头疼了，请大家帮帮忙了。
Private Sub Form_Click()\'FORM的单击事件Dim i, n, sum As Integer\'声明i,n,sum三个整型变量,默认值0For i = 1 To 5 \'外层FOR循环,i从1到5For n = 1 To 100 \'内层FOR循环,n从1到100sum = sum + n
\'sum变量累加n值Next n
\'FOR循环下一个n值sum = sum + i
\'外层循环中,sum继续累加i值Next i
\'外层循环下一个i值Print sum
\'打印sum值,值为25265End Sub
\'单击事件结束Private Sub Form_Click()\'FORM的单击事件Dim i, n, sum As Integer\'声明i,n,sum三个整型变量,默认值0For i = 1 To 5
\'外层FOR循环,i从1到5For n = 1 To 100
\'内层FOR循环,n从1到100sum = sum + n
\'sum变量累加n值Next n
\'FOR循环下一个n值sum = sum + i
\'外层循环中,sum继续累加i值If sum > 10000 Then Exit For \'判断sum值,如果大于10000,则退出循环Next i
\'外层循环下一个i值Print sum
\'打印sum值,值为10103End Sub
\'单击事件结束
提问者对答案的评价：
Private Sub Form_Click()Dim i, n, sum As IntegerFor i = 1 To 5For n = 1 To 100sum = sum + nNext nsum = sum + iNext iPrint sumEnd Subn=(1+2+...+100)*5+(1+2+3+4+5)Private Sub Form_Click()Dim i, n, sum As IntegerFor i = 1 To 5For n = 1 To 100sum = sum + nNext nsum = sum + iIf sum > 10000 Then Exit ForNext iPrint sumEnd Sub(1+2+...+100)+1+(1+2+...+100)+2这时判断sum>10000，结束for语句，输出sum |
