设计一个计算1+2+……+100的值的算法,并话出程序框图

dim i,j as integer
j=0
for i=1 to 100
j=j+i
next i
print j
(vb6.0)
变量j保存结果,在循环中与i相加,i的值从1到100