急求VB程序段：s=1+3+5+7+......+999的值

不明白写的什么

do while i <1000
if i mod 2 <>0 then
sum=sum+i
end if
i=i+1
loop

int s;
for(s=1;s<=999;s++)
s=s+2;
printf("s=%d\n",s);

Private Sub Command1_Click()
s=0
For i = 1 To 1000 Step 2
s = s + i
Next i
Print s
End Sub
或者
Private Sub Command1_Click()
i = 1
Do While i <= 1000
s = s + i
i = i + 2
Loop
Print s
End Sub
或者
Private Sub Command1_Click()
i = 1
Do Until i > 1000
s = s + i
i = i + 2
Loop
Print s
End Sub
答案是250000 你可以将它复制到你的vb代码窗口中试试。。。。。