用do while循环写出s=1+2+3+.100
问题描述:
用do while循环写出s=1+2+3+.100
答
Do.Loop While循环
Dim s As Integer,i As Integer
s = 0
i = 1
Do
s = s + i
i = i + 1
Loop While i