![]() |
#2
xzlxzlxzl2014-11-28 11:03
|
Private Sub Combo2_Click()
删除控件数组 Label7, Text3 '这两个是用load 方法动态创建的控件数组!怎么只能在command_click()事件中卸载?在combo2_click()事件中卸载不了???
end sub
Sub 删除控件数组(ByRef Label As Object, ByRef Text As Object)
counts = Text.Count
For i = counts - 1 To 1 Step -1
Unload Label(i) '卸载不了???
Unload Text(i) '卸载不了???
Next
End Sub