* Keypress event
LPARAMETERS nKeyCode, nShiftAltCtrl
IF m.nKeyCode=32 AND m.nShiftAltCtrl=0
  NODEFAULT
  PRIVATE uniqueVarSelStart
  IF ISNULL(M.THIS.DisplayValue)
    uniqueVarSelStart = 1
  	THIS.DisplayValue = ' '
  ELSE
	uniqueVarSelStart = m.this.SelStart+1
    THIS.DisplayValue = STUFF(M.THIS.DisplayValue,m.uniqueVarSelStart,IIF(INSMODE(),0,1),' ')
  ENDIF
  this.SelStart = m.uniqueVarSelStart
ENDIF

*ProgrammaticChange
IF VARTYPE(M.uniqueVarSelStart)=="N"
	NODEFAULT
ENDIF