for..next 

Sub fornext循环()
Dim i!, j!
For i = 1 To 100 step 1(1可以默认不写)
j = j + i
Next
MsgBox j
End Sub

 

posted @ 2015-09-15 16:14  混混的IT生涯  阅读(125)  评论(0)    收藏  举报