通过控件数组动态增加的控件能不能删除

Question

Private Sub Command1_Click()
Unload Text1(1)
End SubPrivate Sub Command2_Click()
Dim a As String
On Error Resume Next
a = Text1(1).NameIf Err.Number <> 0 Then
   MsgBox "Object isn't Exist"
Else
   MsgBox "Object Exist"
End If
End SubPrivate Sub Form_Load()
Load Text1(1)
Text1(1).Visible = True
Text1(1).Left = 100
Text1(1).Top = 0
End Sub

Answer 1

还有一些控件事件不能unload控件，你可以查看一下MSDN中有关的说明，如combo的click事件等