Net Anlatım .Net Geliştirme

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
  Select Case UnloadMode
        Case vbFormControlMenu
            MsgBox “Kullanici Control menüsünden Close’u seçti”
        Case vbFormCode

            MsgBox “Kod içinden Unload çagrilarak kapatildi”
        Case vbAppWindows
            MsgBox “Geçerli MS Windows oturumu kapandi”
        Case vbAppTaskManager
            MsgBox “MS Windows Task Manager formu programi kapatiyor”
        Case vbFormMDIForm
            MsgBox “MDI child window kapanirken ana ekranida kapatiyor”
    End Select
End Sub