Question

我知道在VB和VB.net中怎样添加动态控件，可是我添加的这些控件怎样添加相应的事件呢？

Answer 1

Dim Text() As Object
Private Sub Form_Load()
Dim i As Integer
Dim nTop As Long

ReDim Text(1 To 10)
For i = 1 To 10
Set Text(i) = Controls.Add("VB.TextBox", "Text1" & CStr(i))
Text(i).Height = 300
Text(i).Top = nTop
Text(i).Visible = True
nTop = nTop + 30 * 15
Next i

End Sub
添加动态控件。你可以自己试试看。 form1上什么都不加运行这个程序后会发现自动生成了10个text控件

Answer 2

我跟你遇到同样的问题，只不过我的是delphi，网上搜索好几天就是找不到！哎