Em algumas aplicações, pode ser útil criar uma janela sem barra de título, especialmente para telas de login, splash screens ou interfaces personalizadas. No Visual Basic, isso pode ser feito ajustando algumas propriedades do formulário.
Configuração do Formulário
Para ocultar a barra de título, configure as seguintes propriedades do Form no Visual Basic:
Caption = ""
ControlBox = False
MinButton = False
MaxButton = False
BorderStyle = 0 ' None (sem borda)
Explicação das Propriedades:
– Caption → Define o título da janela. Se estiver vazio, a barra de título não exibirá texto.
– ControlBox → Remove os botões Fechar, Minimizar e Maximizar.
– MinButton → Oculta o botão de minimizar.
– MaxButton → Oculta o botão de maximizar.
– BorderStyle = 0 (None) → Remove completamente a borda do formulário.
Criando um Formulário sem Barra de Título via Código
Se preferir, você pode remover a barra de título diretamente no código, no evento Form_Load
:
Private Sub Form_Load()
Me.Caption = ""
Me.ControlBox = False
Me.MinButton = False
Me.MaxButton = False
Me.BorderStyle = 0 ' Remove a borda do formulário
End Sub
Movendo o Formulário com o Mouse
Como o formulário não terá barra de título, ele não poderá ser movido da forma tradicional. Para permitir que o usuário arraste a janela, adicione este código ao evento MouseMove
:
Private Declare Function ReleaseCapture Lib "user32" () As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Const WM_NCLBUTTONDOWN = &HA1
Const HTCAPTION = 2
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
ReleaseCapture
SendMessage Me.hWnd, WM_NCLBUTTONDOWN, HTCAPTION, 0
End If
End Sub
O que esse código faz?
Ele permite que o usuário arraste a janela ao clicar e segurar qualquer área do formulário.
Exemplo de Aplicação
Esse tipo de formulário pode ser usado para:
– Criar splash screens personalizadas.
– Desenvolver telas de login sem bordas.
– Criar interfaces customizadas, como menus flutuantes.