被了Unload，还有什么语句还有卸载功能，要卸载整个工程的，（不管这个工程有多少个窗体，一次使性全部卸载）

[xinShi18]

被了Unload，还有什么语句还有卸载功能，要卸载整个工程的，（不管这个工程有多少个窗体，一次使性全部卸载）

[w18ily]

Dim iForm As Long

For iForm = Forms.Count - 1 To 1 Step -1

Unload Forms(iForm)
Next

//
Property Forms As object
只读
VB.Global 的成员
应用程序中加载的所有窗体。

[落伍者]

End

[Cooly]

也可以用下面的方法
Dim f as form

for each f in forms
unload f
next

[wangjidh]

end

[TimLee✿]

在Form的unload事件里打上END