ControleBox
Si vous avez désactiver le controle box vous ne pouvez plus avoir de controle du Form !
Logique !!
Ce code vous permettra d'avoir le controle de votre box même si vous avez désactivé le ControlBox
Public Class Form1
Dim NewPoint As New System.Drawing.Point()
Dim X, Y As Integer
Form1_MouseDown
X = Control.MousePosition.X - Me.Location.X
Y = Control.MousePosition.Y - Me.Location.Y
Form1_MouseMove
If e.Button = MouseButtons.Left Then
NewPoint = Control.MousePosition
NewPoint.X -= (X)
NewPoint.Y -= (Y)
Me.Location = NewPoint
End If
Cordialement p1l0u
Publicité