This sample will load the form at 80% of the screen size
' --- Load the form at 80% of the screen size, centered
Dim n_screenwith As Integer = Screen.PrimaryScreen.Bounds.Width
Dim n_screenheight As Integer = Screen.PrimaryScreen.Bounds.Height
Me.Width = 0.8 * n_screenwith
Me.Height = 0.8 * n_screenheight
Me.WindowState = FormWindowState.Normal
Me.Location = New Point((n_screenwith - Me.Width) / 2, (n_screenheight - Me.Height) / 2)