I got this from FPA in '99. Both work in VFP6-VFP8

Add a Property to Base TextBox Class - SelectOn MouseEntry LOGICAL
Place this code in the GotFocus;

IF THIS.SelectOnMouseEntry
DODEFAULT()
ENDIF

Aug 99

This.SetFocus()
Place in the GotFocus Method of the TextBox