求解

关于private sub command1_click
Dim s As single,i As single
s=0
for i=100To1,step-1
s=s+i
nexti
print “s=”,s
End sub
程序应行的结果是？
的问题

这是计算：100到1的连续自然数的和
结果是：S=5050