[VB.NET] Move a bordless Form

[lanzye]

Hi guys, i'm here to explain you how to move a form without border.

LET'S START!
1. Open VisualBasic and make new project or open one of your project.
2. Now go in the Form Properties, find FormBorderStyle and select None

3. Now double-click on Form and paste this after Public Class Form1

 Private selx As Integer
   Private sely As Integer
   Private selz As Boolean

   Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown
       selz = True
       selx = e.X
       sely = e.Y
   End Sub

   Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
       If selz = True Then
           Me.Left -= (selx - e.X)
           Me.Top -= (sely - e.Y)
       End If
   End Sub

   Private Sub Form1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
       selz = False
   End Sub

Now you can make custom background for your form and he will look like custom skin.

 

[Techfreak]

I was gonna make a similar tut ! Thanks for ur time ;) U could add more screenshots though !! Show examples ! :D

 

[lanzye]

Yes, when i have more time i will show some example.

 

[DutchPride]

Thanks for this, Much apriciated!

 

[lanzye]

Thanks for this, Much apriciated!

No problem mate. I share what i know with this community

 

[DutchPride]

Thanks for this, Much apriciated!

No problem mate. I share what i know with this community

That's the spirit! Thanks for that.

 

[lanzye]

Make this community big as a CPA/PPD Pedia.