Private Sub TextBox1_KeyDown(ByVal sender As System.Object, ByVal e As
System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.Control Then
If e.KeyCode = Keys.A Then
TextBox1.SelectAll()
End If
End If
End Sub

Reply via email to