用VB编程sum=1 (1 2) (1 2 3)

用VB编程：sum=1 (1 2) (1 2 3) ..(1 2 3 .. n)help!

热心网友

dim i as integerdim j as integerdim temp as integerfor j=1 to n temp=0 for i=1 to n temp=temp+n next sum=sum+tempnext