Paul,

Set the Cancel property of your Cancel button to .T. This cause the click of the cancel button to be equivalent of pressing the escape key. Now in any Valid event you can;

* Some Valid event
IF LASTKEY() = 27 && Escape
   KEYBOARD "{CTRL+A}"  && Change lastkey()
   RETURN .T.
ENDIF
* The rest of the Validation code goes here