高考问答女人面部风水图解大全:请教，用VB编程实现1~1--之和的平均值
来源：百度文库 编辑：高考问答 时间：2024/05/13 16:45:26
一定要用VB，有高手没，希望速速回答，有奖励，在线等
上面题目打错了，应该是1~100之和
不好意思，还有高手吗？可以说详细点吗？
上面题目打错了，应该是1~100之和
不好意思，还有高手吗？可以说详细点吗？
我给你写个全的 我用VB试过 正确的！
Private Sub Form_Click()
Dim s As Single
For i = 1 To 100
s = i + s
Next i
Print s / 100
End Sub
把上边的代码复制进去 点下窗体就行!
'下面的代码可以放在一个按钮的单击事件里面。
dim sum as integer '定义一个整形的变量用来存求合后的结果
sum =0
for i=1 to 100
sum =sum+1
next '结束求和循环
print sum '如果不需要在文本框里面输入的话，用这样的格式可以在窗口上面输入这个结果
'如果想把结果在一个文本框里面显示，可以用以下的代码。
text1.text=sum '代换掉前面的print sum '就可以了。
一楼答对了,给分吧
dim i as integer
dim sum as integer
for i=1 to 100
sum = sum + i
next i
sum = sum / 100
print sum
三楼说得对，一楼答对了,没有比这更好的了
最简单的(没求平均）
for i=1 to 100
a=a+i
next
print a