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

  

任何影响窗体外观改变的行为事件里unload语句执行都会产生365错误，如窗体paint、resize等事件。
个人理解：unload语句会也会影响窗体外观，导致窗体绘图区域重画，而combox控件点击后会收起下拉表，也必然要恢复被下拉表遮盖的内容，导致窗体重绘，因此两个窗体重绘动作不能同时并存，就产生了错误。

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