我做了个查询表单，查询结果用表格控件来显示，若要想显示某条记录的详细信息通过点击表格第一列的“分类编码号合同号”来实现表单间参数的传递打开另外一个表单。现在当我输入查询条件点击查询按钮后能显示记录，但是当点击表格第一列“分类编码号合同号”显示详细信息时，就会提示“不能识别的text1”这是怎么回事呢？

查询按钮的Click时间代码：
SELECT  biaoAA
    if empty (alltrim(thisform.Text1.value))
       =messagebox("输入不能为空，请输入查询条件",5+48+0,"信息提示对话框")
       SET FILTER TO
       GO TOP
    ELSE
        SET FILTER TO LIKEC(ALLTRIM(thisform.Text1.value),UPPER(分类编码号合同号))
        go top
        if eof()
          =messagebox("无此记录,请核对所输入的数据是否正确",5+48+0,"信息提示对话框")
          set filter to
          go top
         endIF   
    endif
    thisform.refresh

表格Column1的Text1的Click事件：
LOCAL lcstr
lcstr=ALLTRIM(this.value)
DO FORM E:\系统开发\生产管理\表单AA  WITH lcstr



[ 本帖最后由 gyyimut 于 2014-12-14 09:33 编辑 ]

这是图片

SDTA老师说的很对，正是“SET FILTER TO LIKEC(ALLTRIM(thisform.Text1.value),UPPER(分类编码号合同号))”出了问题。谢谢sdta老师的及时回复！！！Thanks!