Hi Neil
Just add the code for handling the second text field value to your exising code as shown below:
>
>LOCAL lcdesign
>
>DO CASE
> CASE thisform.combo1.displayvalue='='
> lcdesign="modacad.key3=thisform.text1.value"
> CASE thisform.combo1.displayvalue='$'
> lcdesign="modacad.key3$thisform.text1.value"
>ENDCASE
IF NOT EMPTY( ThisForm.text2.value )
lcDesign = lcDesing + ' AND type = ' + ThisForm.Text2.Value
ENDIF
>SELECT * ;
>FROM ("U:\Data\modacad.dbf") ;
>WHERE &lcdesign ;
>order BY mainkey ;
>INTO CURSOR crssearch
>
----
Regards
Andy Kramek