VB编程代码:如果有2010名学生排成一列,按1,2,1,2,3,2,1,2,3,4,3,2...答:j%, iStep Dim s lMax = 2 iStep = 1 j = 0 Do While i < 2010 j = j + iStep If j = lMax Then lMax = lMax + 1 iStep = -1 ElseIf j = 1 Then iStep = 1 End If i = i + 1 s = s & j & ","Loop MsgBox "第" & i & "个数=" & j Debug.Print s ...