#VB ControlBox 關閉,資料儲存動作

希望透過ControlBox的關閉按鈕
能夠偵測那些子表單還沒關閉
並進一步詢問做儲存動作

======================================================

請問如何隱蔵右上角的"X"

http://social.msdn.microsoft.com/Forums/zh-TW/232/thread/7dce534c-10d6-4c15-aa17-f34bcb21a99b/

Public Class Form1

  ' 覆寫 WndProc 進行視窗訊息處理
  Protected Overrides Sub WndProc(ByRef m As Message)
    Const WM_SYSCOMMAND = &H112
    Const SC_CLOSE = &HF060 ' 關閉
    ' Const SC_MIN = &HF020 ' 最小化
    ' Const SC_MAX = &HF030 ' 最大化
    If m.Msg = WM_SYSCOMMAND Then
      If m.WParam = SC_CLOSE Then
        ' =============== 你要做的事情 ==================
        MessageBox.Show("關閉")
        ' =============== 你要做的事情 ==================
        Return
      End If
    End If
    MyBase.WndProc(m)
  End Sub

End Class