编写程序，求1+2+3……+1000的值并输出。

Private Sub Command1_Click()

Dim n As Integer, sum As Long
For n = 1 To 1000
sum = sum + n
Next
Print sum
End Sub

main()
{
int i,sum;
for(i=1;i<=1000;i++)
{sum=sum+i;}
print("%d",sum);
getch();
}

哦 2楼的VB 3楼的C啊
不过3楼的SUM 的范围定义应该错了吧 会益处吧改成长整形

用什么 编程？？我可以给你 做！qq575795250