MDI的字窗口如何彻底被清除？

Question

MDI字窗口的Initialize函数在整个程序中只执行一次，意思是某个窗口无论打开关闭多少次，它的Initialize只发生一次，一旦它被打开过，它会一直存在直到MDI被关闭。如果我的程序子窗口非常的多，比如100个，每个打开多次，这样造成占用大量的系统内存，系统很快就死了。求教各位高手，给支个招，先谢谢各位了！

Answer 1

Dim Frm As Form
        For Each Frm In Forms
            If Frm.MDIChild Then
               Unload Frm
               Set Frm = Nothing
            End If
        Next
        Load Form1 '在此LOAD新窗体

Answer 2

在窗体unload后，再Set Frm = Nothing