textbox 加入到table中
Dim i, j As Integer
For i = 0 To 2
For j = 0 To 2
Dim txtNotice As New TextBox
txtNotice.ID = "Txt" & Format(i, "00") & Format(j, "00")
txtNotice.Height = Unit.Pixel(24)
txtNotice.Width = Unit.Pixel(100)
Me.Controls(1).Controls.Add(txtNotice)
tabNotice.Rows(i).Cells(j).Controls.Add(txtNotice) //这里提示索引超出界限
Next
Next
End If
界面上有一个三行三列的table