高分!用VB编程计算s=1+3+5+7+9+……+53+55的值。

Question

如题所述

Answer 1

可以设置个函数，然后去调用，程序如下：
Private Sub Command1_Click()
Dim s, i As Integer 定义变量整形变量s,i,s是用来存放和的值
For i = 1 To 55 Step 2 定义循环次数
s = s + i
Next i
Label1.Caption = s 定义一个文本框来存放数值
End Sub

Answer 2

Private Sub Command1_Click()
Dim i, sum As Integer
For i = 1 To 55 Step 2
sum = sum + i
Next i
Label1.Caption = sum
End Sub

Answer 3

int sum=0;
for(int i=1;i<=55;i+=2){
sum+=i;
}

Answer 4

Private Sub Command1_Click()
dim i as integer
for i=1 to 55 step 2
m=m+i
next i
print m
end sub本回答被提问者采纳

Answer 5

Private Sub Command1_Click()
Dim s, i As Integer
For i = 1 To 55 Step 2
s = s + i
Next i
Form1.Print s
End Sub