Private Sub TextBox1_KeyPress(ByVal sender As Object, _
   ByVal e As System.Windows.Forms.KeyPressEventArgs) _
   Handles TextBox1.KeyPress
 
   End Sub
 
   Private Sub TextBox1_TextChanged(ByVal sender As System.Object, _ 
   ByVal e As System.EventArgs) _
   Handles TextBox1.TextChanged
 
   End Sub