dim i as integer
dim sum,ji
sum=0
ji=1
for i to 1000
sum=sum+i
ji=ji*i
next i
print sum
print ji
你没输出语句啊