为何出现“Thisform只能在方法程序中使用。”的错误提示?

Sander 2000-07-17 06:32:00
请高手指点!
--------------------------------------------------------------------------------
为何出现“Thisform只能在方法程序中使用。”的错误提示?
我在PVFP5.0编写一表单集程序。
FORM1:有一命令按钮COMMAND3
CLICK:if len(alltrim(thisform.text1.value))<>0
SET FILTER TO
sele ryqk
if substr(alltrim(thisform.text1.value),1,1)$'0123456789'
set filter to substr(ryqk.no,1,len(alltrim(thisform.text1.value)))=alltrim(thisform.text1.value)
else
set filter to substr(ryqk.name,1,len(alltrim(thisform.text1.value)))=alltrim(thisform.text1.value)
endif
go top
endif
*Thisformset.form2.HIDE
Thisformset.form2.show
thisform.refresh
按第一次无错误提示,按第二次出现错误提示!请问是何原因????????

另我做如下改动:
if len(alltrim(thisform.text1.value))<>0
SET FILTER TO
sele ryqk
mya=thisform.text1.value &&mya 在 FORM1 ACTIVE:PUBLIC MYA
if substr(alltrim(mya),1,1)$'0123456789'
set filter to substr(ryqk.no,1,len(alltrim(mya)))=alltrim(mya)
else
set filter to substr(ryqk.name,1,len(alltrim(mya)))=alltrim(mya)
endif
go top
endif
*Thisformset.form2.HIDE
Thisformset.form2.show
thisform.refresh
此无问题!!!!!
请高手指点!!!!
...全文
337 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
skt642 2001-05-31
  • 打赏
  • 举报
回复
34400关注!
xuch 2000-07-18
  • 打赏
  • 举报
回复
出现“Thisform只能在方法程序中使用。”的错误提示一般是在 .PRG文件中使用了Thisform的方法,但只是一般,不要被迷惑。以上问题其实提问者自己已经解决。
一个表使用了 set filter to 筛选后,其筛选条件应尽量使用一些全局变量或字段变量。否则当表的记录指针移动时,Foxpro 按筛选条件去定位,如果筛选条件中的变量不能找到就会出错。由于筛选条件设置不当引起的怪问题我已经遇到多次。

34,576

社区成员

发帖
与我相关
我的任务
社区描述
MS-SQL Server相关内容讨论专区
社区管理员
  • 基础类社区
  • 二月十六
  • 卖水果的net
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧