查询在表单的引用(请赐教) - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 查询在表单的引用(请赐教)

标题：查询在表单的引用(请赐教)

只看楼主

wuyuqingzhu

等　级：新手上路
帖　子：69
专家分：0
注　册：2006-5-24

楼主

问题点数：0 回复次数：3

查询在表单的引用(请赐教)

各位大哥请教以下,我怎么可以实现按下查询键图右边的GRID1控键就可以显示我左边填入想查询的数据呢?

这个查询按扭的代码怎么编写? #11 谢谢,

[此贴子已经被作者于2006-5-24 16:43:48编辑过]

搜索更多相关主题的帖子: 表单　查询　

2006-05-24 16:37

hdzqs

等　级：禁止访问
帖　子：218
专家分：0
注　册：2006-4-25

第 2 楼

得分:0

利用简单的查询命令：
sele 数据表
loca all for <查询条件>
。。。
thisform.refresh
查询按纽:click

把您的需求变成我们的信息让我们的信息成为您的财富

2006-05-24 20:49

Tiger5392

等　级：贵宾
威　望：88
帖　子：2775
专家分：2237
注　册：2006-5-17

第 3 楼

得分:0

用
SET FILTER TO <条件>
可能最好

感言：学以致用。博客：http://www./blog/user14/65009/index.shtml email：Tiger5392@

2006-05-24 21:05

Tiger5392

等　级：贵宾
威　望：88
帖　子：2775
专家分：2237
注　册：2006-5-17

第 4 楼

得分:0

假设你在表单的初始化程序(FORM1.INIT)中打开了表
CLOSE ALL
USE 表1.DBF
THISFORM.GRID1.COLUMNCOUNT=-1
THISFORM.GRID1.RECORDSOURCETYPE=6
THISFORM.GRID1.RECORDSOURCE="表1"

则你就可以在查询命令按钮(比如根据文件名查询的那个命令按钮)写上这样的程序
IF THIS.CAPTION="查询"
THIS.CAPTION="取消"
SET FILTER TO 文件名=THISFORM.TEXT2.VALUE
ELSE
THIS.CAPTION="查询"
SET FILTER TO
ENDIF
THISFORM.REFRESH

[此贴子已经被作者于2006-5-26 15:14:18编辑过]

感言：学以致用。博客：http://www./blog/user14/65009/index.shtml email：Tiger5392@

2006-05-26 15:14

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-66808-1-1.html