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

  

谢谢版主！问题已经解决了