>>>>llfound = INDEXSEEK(lccid) >>>> >>>>IF llFound AND lcCID <> gCID >>>> =msgfrm(SPACE(4) + 'User ID ' + lcCID + ' already exists.' + ; >>>> CHR(10) + SPACE(10) + 'Re-enter or Revert.' ; >>>> ,'0',,'S','Existing field value',0,gnMsgWait) >>>> KEYBOARD '{LEFTARROW}' >>>> RETURN >>>>ENDIF >>>>>>>>I used debug to see the values
KEYBOARD '{LEFTARROW}' should be Thisform.CID1.Setfocus>>