Запретить сторонней программе переход в полноэкранный режим

Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        Me.WindowState = FormWindowState.Normal
End Sub

Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
  ' Разрешаем пользователю свернуть, развернуть и восстановить окно,
  ' но не разрешаем менять размеры окна.
  ' Ловим сообщение WM_SYSCOMMAND. Если параметр wParam равен SC_SIZE,
  ' игнорируем это сообщение. В других случаях вызываем базовый 
  ' метод WndProc для обработки других сообщений
  Const WM_SYSCOMMAND As Long = &H112
  Const SC_SIZE As Long = &HF000
 
  ' Если поступило сообщение WM_SYSCOMMAND.
  If m.Msg = WM_SYSCOMMAND Then
    ' Игнорируем команду SC_SIZE
    If (m.WParam.ToInt32 And &HFFF0&) = SC_SIZE Then _
       Exit Sub
  End If
 
  MyBase.WndProc(m)
End Sub