dim I as interger dim j as intergerdim s as interger s=0j=-1for i = 1 to 100 j=j*(-1) s=s + i*jnext idebug.print s
最多设置5个标签!
dim I as interger
dim j as interger
dim s as interger
s=0
j=-1
for i = 1 to 100
j=j*(-1)
s=s + i*j
next i
debug.print s