Como Centralizar um Formulário no Visual Basic

Ao criar aplicações no Visual Basic, muitas vezes é necessário centralizar um formulário na tela para melhorar a experiência do usuário. Isso pode ser feito ajustando as propriedades Top e Left do formulário durante a inicialização.

Centralizando um Formulário Automaticamente

Podemos criar uma função reutilizável para centralizar qualquer Form na tela, chamando-a no evento Form_Load.

1. Criando a Função de Centralização

Sub CenterForm(f As Form)
    Screen.MousePointer = 11 ' Altera o cursor para "Aguardando"
    f.Top = (Screen.Height - f.Height) / 2
    f.Left = (Screen.Width - f.Width) / 2
    Screen.MousePointer = 0 ' Retorna o cursor ao normal
End Sub

2. Chamando a Função no Evento Form_Load

Private Sub Form_Load()
    CenterForm Me ' Centraliza o formulário atual
End Sub

Explicação do Código

– Screen.MousePointer = 11: Exibe um cursor de “Aguardando” enquanto o cálculo é feito.
– f.Top = (Screen.Height – f.Height) / 2: Centraliza o formulário verticalmente.
– f.Left = (Screen.Width – f.Width) / 2: Centraliza o formulário horizontalmente.
– Screen.MousePointer = 0: Retorna o cursor ao normal após a centralização.

Observação

Para garantir que o formulário seja corretamente centralizado, defina a propriedade StartUpPosition do formulário como Manual no Properties Window.

Outras Dicas sobre Formulários no Visual Basic

Além da centralização, você pode configurar seu formulário para abrir maximizado automaticamente:

Private Sub Form_Load()
    Me.WindowState = 2 ' Maximiza o formulário ao abrir
End Sub

Ou impedir que o usuário redimensione a janela:

Private Sub Form_Load()
    Me.BorderStyle = 1 ' Define como "Fixed Single"
End Sub

Posts Similares