Case ThisForm.Combo1.DisplayValue == "="When you look at this in the debugger what exactly is the DisplayValue?
>>LOCAL lcwhere1 >>SET EXCLUSIVE OFF >>SET DELETED ON >> >>DO CASE >> CASE thisform.combo1.displayvalue='=' >> lcwhere="modacad.key3=thisform.combo1.displayvalue" >> CASE thisform.combo1.displayvalue='==' >> lcwhere="modacad.key3==thisform.combo1.displayvalue" >> CASE thisform.combo1.displayvalue='$' >> lcwhere="modacad.key3$thisform.combo1.displayvalue" >>ENDCASE >>SELECT * ; >>FROM ("U:\Data\modacad.dbf") ; >>WHERE &lcwhere ; >>order BY mainkey ; >>INTO CURSOR crssearch >>>>
>>>LOCAL lcwhere1, lcwhere2, lcwhere3 >>>SET EXCLUSIVE OFF >>>SET DELETED ON >>> >>>lcwhere1="modacad.key3=thisform.combo1.displayvalue" >>>lcwhere2="modacad.key3==thisform.combo1.displayvalue" >>>lcwhere3="modacad.key3$thisform.combo1.displayvalue" >>> >>>DO CASE >>> CASE 1 >>> IF thisform.combo1.displayvalue='=' >>> SELECT * ; >>> FROM ("U:\Data\modacad.dbf") ; >>> WHERE lcwhere1 ; >>> order BY mainkey ; >>> INTO CURSOR crssearch >>> ENDIF >>> CASE 2 >>> IF thisform.combo1.displayvalue='==' >>> SELECT * ; >>> FROM ("U:\Data\modacad.dbf") ; >>> WHERE lcwhere2 ; >>> order BY mainkey ; >>> INTO CURSOR crssearch >>> ENDIF >>> CASE 3 >>> IF thisform.combo1.displayvalue='$' >>> SELECT * ; >>> FROM ("U:\Data\modacad.dbf") ; >>> WHERE lcwhere3 ; >>> order BY mainkey ; >>> INTO CURSOR crssearch >>> ENDIF >>> >>>ENDCASE >>>>>>