SendKeys.Send("^A")

[ucasesoftware]

All SendKeys.Send like ^C, ^V, ^X work in my form with textboxes but
SendKeys.Send("^A") doesn't work ! ??

i have a bip error windows ! ?

 

[Herfried K. Wagner [MVP]]

All SendKeys.Send like ^C, ^V, ^X work in my form with textboxes but
SendKeys.Send("^A") doesn't work ! ??

The textbox control doesn't support selecting the whole text using a
keyboard shortcut. You may want to use the code below instead:

\\\
If TypeOf Me.ActiveControl Is TextBox Then
Dim txt As TextBox = DirectCast(Me.ActiveControl, TextBox)
txt.SelectAll()
End If
///

 

[ucasesoftware]

I have a problem with your code cause i have a MDI application
me.activateControl is the child and not the textbox in the child
form

 

[ucasesoftware]

Here is the solution for mdi Child
If TypeOf Me.ActiveMdiChild.ActiveControl Is TextBox Then
Dim txt As TextBox =
DirectCast(Me.ActiveMdiChild.ActiveControl, TextBox)
txt.SelectAll()
End If

Thx a lot again