Sorry

the point I am making is that you are using the combo displayvalue twice.

He should be entering

lcwhere="modacad.key3=thisform.textbox1.value"

so you could say

lccondition = thisform.combo1.displayvalue

lcwhere="modacad.key3"+lccondition+thisform.textbox1.value

or

lcwhere="modacad.key3"+thisform.combo1.displayvalue+thisform.textbox1.value

then you don't need a case statment anyway.

Nick



>Does the following work?

>Case ThisForm.Combo1.DisplayValue == "="
>

>When you look at this in the debugger what exactly is the DisplayValue?
>
>
>>IF thisform.combo1.displayvalue='='
>>then
>>lcwhere="modacad.key3=thisform.combo1.displayvalue"
>>
>>will end up as "modcad.key3=="
>>
>>>I think you need the &lcWhere and your Case looks a bit odd to me. Try
>>>

>>>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
>>>

>>>
>>>
>>>>Thanks Caroline,
>>>>
>>>>I decided to use variables in a case statements:
>>>>
>>>>

>>>>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
>>>>

>>>>
>>>>I get a syntax error. Do you have any ideas as to why this doesn't work?
>>>>
>>>>Thanks Caroline