Vb.net center form in screen

  Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Me.Size = New System.Drawing.Size(400, 650)
    Me.CenterToScreen()
End Sub

Source: stackoverflow.com

Vb.net center form in screen

Public Shared Sub CenterForm(ByVal frm As Form, Optional ByVal parent As Form = Nothing)
    '' Note: call this from frm's Load event!
    Dim r As Rectangle
    If parent IsNot Nothing Then
        r = parent.RectangleToScreen(parent.ClientRectangle)
    Else
        r = Screen.FromPoint(frm.Location).WorkingArea
    End If

    Dim x = r.Left + (r.Width - frm.Width) \ 2
    Dim y = r.Top + (r.Height - frm.Height) \ 2
    frm.Location = New Point(x, y)
End Sub

Source: stackoverflow.com

Similar codes

0 vote272 views1 answer
Search list for words c#
C#
1 vote258 views1 answer
Audiomixer get float
C#
2 votes276 views1 answer
Where C#
C#
5 votes260 views7 answers
If statement
C#
1 vote263 views2 answers
Data rows to datatable c#
C#
0 vote271 views1 answer
Blazor image button
C#
0 vote256 views1 answer
C# system cryptography hash string
C#
0 vote312 views1 answer
Length of array c# unity
C#Unity
15 votes213 views5 answers
C# function return
C#
4 votes320 views1 answer
How to make a singleton in unity
C#Unity