上代码如下：
Public Class Form1
Dim tx(120) As TextBox
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
tx(0) = New TextBox
tx(0).Size = New Size(70, 21)
tx(0).Location = New Point(12, 282)
tx(101) = New TextBox
tx(101).Size = New Size(70, 21)
tx(101).Location = New Point(88, 282)
Me.Controls.Add(tx(0))
Me.Controls.Add(tx(101))
For i = 1 To 10
For j = 1 To 10
tx(j + 10 * (i - 1)) = New TextBox
tx(j + 10 * (i - 1)).Name = "TX" & j + 10 * (i - 1)
tx(j + 10 * (i - 1)).Size = New Size(70, 21)
tx(j + 10 * (i - 1)).Location = New Point(12 + (j - 1) * 76, 12 + (i - 1) * 27)
Me.Controls.Add(tx(j + 10 * (i - 1)))
Next
Next
tx(1).Text = 1
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
For i = 0 To 100
If Len(tx(i).Text) > 0 Then TextBox2.Text = i
tx(101 - i).Text = tx(100 - i).Text
Next
TextBox1.Text=Val(TextBox1.Text)+1
End Sub
End Class
Tx是我定义的一个Textbox控件数据，textbox1和textbox2是另外加上去的控件，我的目的的是每当我按一次button，Textbox1会记录下我按的次数，Textbox2会显示出数组中当前哪一个变量会存有数据，那么问题来了，为什么当我按下第50次的时候，存在第49位的变量数据立刻就存到第51位去了？求解，大神们可以复制代码看看。