| Public Class MyTextBox |
| Inherits TextBox |
| Private WM_KEYUP As Integer = &H101 |
| If m.Msg = WM_KEYUP Then |
| Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message) |
| Return 'ignore the keyup |
| End If |
| MyBase.WndProc(m) |
| End Sub 'WndProc |
| End Class 'MyTextBox |