计算1-1000之间不能被7整除的数的和的vbscript程序,分别用do...loop、for...next、while...wend3种语句

问题描述:

计算1-1000之间不能被7整除的数的和的vbscript程序,分别用do...loop、for...next、while...wend3种语句

dim he,i
he = 0
i = 1
do until i > 1000
if i mod 70 then
he = he + i
end if
i = i + 1
loop
msgbox he
'
dim he,i
he = 0
i = 1
while i