一个循环相加1+3+5+7+9的程序，求大虾帮忙

Question

在command1单击事件中用Do-loop while 和 for 循环语句编写程序实现计算1+3+5+7+9，而且结果还是要用labe14显示出来，求高手解答。
知道的能麻烦说一下吗？我是急着要的

Answer 1

这个不用高手解答，如果你这个也不会的话，那你还是好好学一下VB吧。估计你一点没学过。本回答被提问者采纳

Answer 2

Private Sub Command1_Click()
For i = 1 To 9
If i Mod 2 <> 0 Then Sum = Sum + i
Next
label4.Caption = Sum
i = 0
Sum = 0
Do While i <= 9
i = i + 1
If i Mod 2 <> 0 Then Sum = Sum + i
Loop
label4.Caption = Sum

End Sub

Answer 3

dim s,i as integer
s=0
i=1
do
s=s+i
i=i+2
loop while i<=9
label4.text=s.tostring

Answer 4

Private Sub Command1_Click()
s = 0
i = 1
Do While i <= 9
s = s + i
i = i + 2
Loop
Label14 = s
End Sub

Private Sub Command1_Click()
For i = 1 To 9 Step 2
s = s + i
Next
Label14 = s
End Sub