if empty(this.value) return endif sele Ther seek alltrim(this.value) if !found() wait window "Staff Code Not Found" else ThisForm.LstStaff.AddListItem(alltrim(Ther.fname) + ' ' + alltrim(Ther.lname) + iif(empty(Ther.title),'',' ' + Ther.title)) thisform.lststaff.addlistitem(Ther.thid, thisform.lstStaff.NewItemID,2) Thisform.lststaff.numberofelements = Thisform.lststaff.numberofelements + 1 endif this.value = '' return -1The "return -1" replaced the "this.setfocus()" call that didn't work either