问题如上传的图，当点“精确查找”按钮时提示程序错误，错误为“函数参数的值、类型或数目无效”，各位大虾，怎么解决这问题？
代码：
LOCAL SearchFilter
SearchFilter=".T."
IF NOT EMPTY(ALLTRIM(THISFORM.text1.Value))
SearchFilter=SearchFilter + "and 部门='" + ALLTRIM(THISFORM.text1.Value)+"'"
ENDIF
IF NOT EMPTY(THISFORM.text2.Value)
SearchFilter=SearchFilter + "and 大箱号='" + THISFORM.text2.Value + "'"
ENDIF
IF NOT EMPTY(ALLTRIM(THISFORM.text3.Value))
SearchFilter=SearchFilter + "and 物品名称='" + ALLTRIM(THISFORM.text3.Value) + "'"
ENDIF
IF NOT EMPTY(ALLTRIM(THISFORM.text4.Value))
SearchFilter=SearchFilter + "and 入库日期=" + ALLTRIM(THISFORM.text4.Value)
ENDIF
SELECT rk
SET FILTER TO
SET FILTER TO &SearchFilter

红字的有错吗？
谢谢

你的ＴＥＸＴ控件是日期型的吗？
即然是日期型为什么还要用字符处理函数ＡＬＬＴＲＩＭ（）
如果你的ＴＥＸＴ控件是字符型的而你的表中字段是日期型的当然要出现这个问题
如你的ＴＥＸＴ控件是字符型的前面还应加ctod()

谢谢leeping,可是按照您的提示，还是不行！我把alltrim()去掉了，该“IF NOT EMPTY(ALLTRIM(THISFORM.text4.Value))
SearchFilter=SearchFilter + "and 入库日期=" + ALLTRIM(THISFORM.text4.Value)
ENDIF”是没问题。可是问题出在“SET FILTER TO &SearchFilter”处，错误提示是“函数参数的值、类型或数目无效”，请问这又是什么问题？请帮助！
谢谢

&SearchFilter是一个宏，
IF NOT EMPTY(ALLTRIM(THISFORM.text4.Value))
SearchFilter=SearchFilter + "and 入库日期=" + ALLTRIM(THISFORM.text4.Value)
ENDIF
这个地方的ALLTRIM(THISFORM.text4.Value)改为
CTOD（ALLTRIM(THISFORM.text4.Value)）试下

楼上的大侠，按照您的方法，还是出同样的错误！不过还是非常感谢你！