Tecla ENTER

[rodrigotnoma]

Boa noite

Tentei debugar esse código:

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown

        Dim tecla As Short = e.KeyCode
        Dim enter As Short = e.KeyCode

        If tecla = System.Windows.Forms.Keys.Escape Then

            If MsgBox("Deseja realmente sair?", MsgBoxStyle.OkCancel) = vbOK Then

                Me.Close()

            End If

        End If

        If enter = System.Windows.Forms.Keys.Enter Then

            Form3.Show()

        End If
       

    End Sub

Mas quando teclo ENTER, ele deveria abrir o Form3, mas simplesmente fecha o form, se pressiono ESC o procedimento ocorre de forma correta,ou seja, abre um msgbox perguntando se desejo fechar o form.

Vlw pela ajuda.

Rodrigo

Editado Maio 21, 2009 por quintelab
Adicionado BBCode Code

[quintelab]

Quando utiliza a tecla enter ele passa pelo código que da o Close?

Abraços...