Question

用VB 10个数组里面求平均值！

我是这么写的，不过错了不知道为什么/
dim a(9) as integet
s=0
for i = 0 to 9
s = s+a(i)
next
text8.text=s/10
end sub哪里错了啊亲。我要疯了
对了我的数组是text1(0).text到text(9).text的算他们加起来的平均值

Answer 1

你这一段程序定义了数组以后直接就求平均值了，根本没有给数组的元素赋值，所以默认当然是0了，所有值是0，平均当然也是0，你给数组元素赋值一下，就可以了。
比如：
for i = 0 to 9
a(i)=rnd
s = s+a(i)
next

Answer 2

1111111111111111111111111111111111111111111111111111

Answer 3

错误提示是啥？

追问

没有提示啊，只是算出来是0....

追答

没有赋值给数组

dim a(9) as integer
dim s as integer
s=0
for i = 0 to 9
    a(i)=cint(text1(i).text)
    s = s+a(i)
next
text8.text=s/10