麻烦各位帮我看一下下面这段vb语言为什么平均数算出来不对,麻烦能详细帮我解释一下,谢谢!!

来源：百度知道编辑：UC知道时间：2024/06/06 03:25:14

Private Sub Command1_Click()
Dim a(5) As String, i%, b!
For i = 1 To 5
a(i) = InputBox("请输入数值")
Next i
Print "数值为"
For i = 1 To 5
Print a(i),
Next i
Print
Print "平均数为"
For i = 1 To 5
b = 0
b = b + a(i)
Next i
b = b / 5
Print b,
End Sub
我按照你的方法改了,可是在运行时,我输了5个2进去,可平均数算出来变49984了,结果还是不对啊

Private Sub Command1_Click()
Dim a(5) As integer
For i = 1 To 5
a(i) = InputBox("请输入数值")
Next i
Print "数值为"
For i = 1 To 5
Print a(i),
Next i
Print
Print "平均数为"
For i = 1 To 5
b = 0
b = b + a(i)
Next i
b = b / 5
Print b,
End Sub

麻烦各位帮我看一下下面这段vb语言为什么平均数算出来不对,麻烦能详细帮我解释一下,谢谢!! 麻烦大家帮我看一下这段简单VB程序到底有什么问题? 各位高手帮我看一下，这段VB程序错在哪了帮我看一下这段VB代码？请帮我看一下下面这段程序麻烦帮我看一下这段代码,谢谢~~~~~~~ VB高手帮我看一下这段VB程序吧麻烦帮我翻译一下下面这段化学论文，我很急用，谢谢！！！请帮我看一下下面一段vb代码麻烦帮我看一下下面这段话有没有错误？