sábado, 1 de outubro de 2011

on

Public Class Form1

    Private Sub TextBox1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress

        If (e.KeyChar = ChrW(13)) Then
            SendKeys.Send("{TAB}")
            e.Handled = True
        End If

    End Sub
End Class


0 comentários:

Postar um comentário