FECHAR FORM COM ALT F4

PERCIFILHO 12/07/2013 10:23:00
#425938
Bom dia, pessoal.

Meu formulário é FixedSingle com o ControlBox=False e o Alt+F4 para fechar não funciona.
Como posso fazer para fechar o formulário pressionando Alt+F4?

Até mais.
ADHEL 12/07/2013 11:52:24
#425950 Resposta escolhida 
    Private Sub Form1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Me.KeyPress
        If e.KeyChar = Chr(Keys.Alt And Keys.F4) Then
            Me.Close()
        End If
    End Sub
PERCIFILHO 12/07/2013 12:38:52
#425953
Agora descobri o seguinte:
Coloquei no Evento KeyDown do formulário uma condição: se o usuário clicar F-4, executa uma ação que está no código do botão próximo registro (para navegar para o próximo registro da tabela).
Daí, se eu colocar esse código para fechar o formulário com as teclas Alt+F4, não funciona.

Alguém me diria como proceder nesse caso?

Até mais.
ADHEL 12/07/2013 16:06:10
#425963 
  Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        Select Case e.KeyCode
            Case e.Alt = True And Keys.F4
                Me.Close()
            Case Keys.F4
               [Ô]Sua_Rotina[Ô]
        End Select
    End Sub
PERCIFILHO 12/07/2013 16:35:37
#425966
Valeu, Adhel muitíssimo obrigado.

Até mais.
Tópico encerrado , respostas não são mais permitidas
Voltar