Me.WindowState = FormWindowState.Minimized
Me.WindowState = FormWindowState.Normalla rend à sa taille normale (comme indiqué)
Public Class Form1 Private Sub Button1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button1.MouseClick If MessageBox.Show("Quit the game", " ", MessageBoxButtons.YesNo, MessageBoxIcon.Warning, MessageBoxDefaultButton.Button1, MessageBoxOptions.DefaultDesktopOnly) = DialogResult.Yes Then Me.Close() Else Me.WindowState = FormWindowState.Minimized End If End Sub End Class
Else Me.WindowState = FormWindowState.Minimized