simply do this
VB Code:
  1. Private Sub Form1_Resize(ByVal sender As Object, ByVal e As _
  2. System.EventArgs) Handles MyBase.Resize
  3.  
  4.  MsgBox(Me.WindowState.ToString)
  5.  
  6. End Sub