Public Class MyTextBox
    Inherits TextBox
 
    Protected Overrides Sub OnKeyPress(ByVal e As KeyPressEventArgs)
        If Asc(e.KeyChar) = 13 Then
            e.Handled = True
        Else
            MyBase.OnKeyPress(e)
        End If
    End Sub
End Class