为什么子窗口不能unload？

Question

我的程序有一个mdi窗口，若干子窗口，我在每个子窗口上“的关闭”按钮的click事件中加入代码：
Dim form1 As New xxx  (xxx为form名)
Unload form1
但运行时，此按钮却毫无反应。
这是为什么，如果这么做不对，想关闭子窗口应该怎么做？

Answer 1

Dim form1 As New xxx  (xxx为form名)
Unload me

Answer 2

dim aa as Form
For Each aa in Forms
if Typeof aa Is Form1 Then
UnLoad aa
Endif 
Next aa