Gesamtes Feld Markieren

[netfireman]

Hallo,

ich habe ein Formular auf dem mehrere Textfelder vorhanden sind. Bei einem Textfeld will ich sobald es den Focus bekommt alles markieren. Wie kann ich das am Besten machen??

Gruß

netfireman

[Blondi]

Eine Standardfunktion ist mir da nicht bekannt.

Aber du kannst mit den Eigenschaften des Textfeldes "SelStart" und "SelLength" arbeiten.

Im GotFocus Ereigniss einfach SelStart auf 0 setzen und SelLenght auf die Länge des Textes im Feld.

[Gast]

Private Sub Text1_GotFocus()

    SendKeys ("+{END}")

End Sub

[netfireman]

Danke das mit dem SendKeys hat funktioniert.