7楼已经指出了错误的代码

改过了，还是老问题

相关文件：是指与你这次发生错误有关的文件。你发了个项目管理器及一个DBF(还缺少备注文件)文件，是解决不了问题的。

thisform.pageframe1.&&(查询按钮)代码：
SELECT   biao1
SET FILTER TO  LIKEC(ALLTRIM(zfc),UPPER(编号))
GO top
  if eof()
     =messagebox("无此记录",5+48+0,"信息提示对话框")
   ELSE 
   Thisform.pageframe1.page2.text1.value=biao1.编号
   Thisform.pageframe1.page2.text2.value=biao1.合同号
   Thisform.pageframe1.page2.text3.value=biao1.品号
   thisform.Refresh 
   THISFORM.PageFrame1.ActivePage = 2 
ENDIF



thisform.pageframe1.&&(上一条按钮代码)
SELECT   biao1
SKIP -1
IF bof()
   GO top 
      =messagebox("已经是第一条纪录！",48,"信息窗口")
      Thisform.pageframe1.=.f.    &&使【上一条】按钮不可用
      Thisform.pageframe1.=.f.   &&使【第一条】按钮不可用

else
      this.enabled=.t.
      Thisform.pageframe1.=.t.   &&使【第一条】按钮可用

ENDIF 
      Thisform.pageframe1.=.t.
      Thisform.pageframe1.=.t.
      thisform.pageframe1.page2.refresh 


thisform.pageframe1.&&&(下一条按钮代码)
SELECT   biao1
SKIP 
IF eof() 
   GO BOTTOM 
      =messagebox("已经是最后一条纪录！",48,"信息窗口") 
      Thisform.pageframe1.=.f.   &&使【下一条】按钮不可用
      Thisform.pageframe1.=.f.   &&使【最后一条】按钮不可用
else
      Thisform.pageframe1.=.t.  
ENDIF 
      Thisform.pageframe1.=.t.   &&使【下一条】按钮不可用
      Thisform.pageframe1.=.t. 

 Thisform.pageframe1.page2.refresh

[ 本帖最后由 gyyimut 于 2014-8-15 17:24 编辑 ]

这是挂起来以后的情况

代码要写在不同的按钮中，不能放在一起。
既然按钮的功能是查询，那么该按钮下的代码就要与查询有关。

[ 本帖最后由 sdta 于 2014-8-15 17:45 编辑 ]

sdta老师，SET FILTER TO  LIKEC(ALLTRIM(zfc),UPPER(编号))这句就是实现筛选（查询）啊，我是刚学VFP，还请sdta老师指点...

既然是初学，那就认真看下与SET FILTER命令相关的内容。
关键问题在于基础不牢。

将出错的SKIP代码整行删除，再重新键入SKIP命令试试。我怀疑是这行当中隐藏了不可见的字符。