Question

vb 总是提示索引超出了数组界限

Dim a(7) As Integer
Dim i As Integer
a(0) = 1
a(1) = 2
a(2) = 2
a(3) = 4
a(4) = 5
a(5) = 6
a(6) = 7
a(7) = 8
For i = 0 To 7
If a(i) < a(i + 1) Then
a(i) = a(i + 1)
Else
a(i) = a(i)
End If
Next i
TextBox50.Text = a(i)
求大神解答

Answer 1

For i = 0 To 7
If a(i) < a(i + 1) Then
a(i) = a(i + 1)'定义时，数组下标最大为7，而这里，i=7时，a(i+1)就是a(8)了。不是吗？
Else
a(i) = a(i)
End If
Next i

追问

a(0) = Val(TextBox59.Text)
a(1) = Val(TextBox60.Text)
谢谢，我想再问问，我把数字换成文本框的值，TextBox50.Text就只显示0，如果定义数字，就会显示数字，这是怎么回事