vb中如何判断点击了最小化按钮

Question

Private Sub Form_Resize()
    MsgBox Form1.WindowState
End Sub

Answer 1

Private Sub Form_Resize()    if WindowState=1 then
         Hide
    else
         'Do Something
    end if
End Sub

Answer 2

Private Sub Form_Resize()
 If Me.WindowState = 1 Then MsgBox "minizie"
End Sub

Answer 3

Private Sub Form_Resize()
    if WindowState=1 then
        Hide
    else
        Unload me
    end if
End Sub