求1+2+3+* * * +100
(A) Sum=0              (B)Sum=0  I=1        
    I=1                   Do
    Do While I<=100       Sum=Sum+I
   Sum=Sum+I                I=I+1
   I=I+1                   Loop While I<=100
   Loop

    Do While I<=100
   Sum=Sum+I
   I=I+1
   Loop

    I=1
    Do While I<=100
   Sum=Sum+I
   I=I+1
   Loop

(A) Sum=0              (B)Sum=0  I=1        
    I=1                   Do
    Do While I<=100       Sum=Sum+I
   Sum=Sum+I                I=I+1
   I=I+1                   Loop While I<=100
   Loop

初学VB