Private Sub Form1_Resize(.......)
If Me.WindowState=FormWindowState.Minimized Then
Me.Text="我最小化了!"
Me.ShowInTaskbar=False
ElseIf Me.WindowState=FormWindowState.Maximized Then
Me.Text="我最大化了!"
Me.ShowInTaskbar= True
End If
End Sub
Private Sub Form1_Resize(.......)
If Me.WindowState=FormWindowState.Minimized Then
Me.Text="我最小化了!"
Me.ShowInTaskbar=False
ElseIf Me.WindowState=FormWindowState.Maximized Then
Me.Text="我最大化了!"
Me.ShowInTaskbar= True
End If
End Sub