* Combo Requery LOCAL lnNewItem WITH THIS lnNewItem = .NewItemId + 1 SCAN IF Active .AddListItem(Name,lnNewItem,1) ELSE .AddListItem("\"+Name,lnNewItem,1) ENDIF lnNewItem = .NewItemId + 1 ENDSCAN ENDWITHNow set the rowsourcetype to None and the rowsource is blank.