Centrar un formulario en pantalla

[h0ax]

Para saber cómo centrar un objeto en el medio de algo, conociendo las dimensiones del objeto y del lugar en que lo queremos poner, podemos decir que:

Centro = (Tamaño del lugar - tamaño del objeto)/2

Ahora no haremos más que utilizar esta fórmula para colocar un formulario en el medio de la pantalla, para esto lo haremos utilizando Visual Basic, y el código es:

Código: Seleccionar todo

Dim TopCorner As Integer
Dim LeftCorner As Integer


If Form1.WindowState <> 0 Then Exit Sub


TopCorner = (Screen.Height - Form1.Height) \ 2
LeftCorner = (Screen.Width - Form1.Width) \ 2
Form1.Move LeftCorner, TopCorner