>I am trying to get this to work, so there is nothing else in the KeyPress event. If you could provide complete details, it would be greatly appreciated!
>
>Thanks.

LPARAMETERS nKeyCode, nShiftAltCtrl
if nKeyCode > 0
   dodefault(nKeyCode, nShiftAltCtrl)
   thisform.Label1.Caption = this.value
   nodefault 
Endif