| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 6374 人关注过本帖
标题:vfp表单怎么选择表格数据显示
只看楼主 加入收藏
lky547377578
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2016-10-25
结帖率:90.91%
收藏
已结贴  问题点数:20 回复次数:13 
vfp表单怎么选择表格数据显示
图片附件: 游客没有浏览图片的权限,请 登录注册

想制作一个表单,要求根据左边命令按钮组和选项按钮组控制表格数据显示,通过命令按钮组控制选项按钮组,然后通过选项按钮组控制表格对应显示数据。比如命令按钮组里面点击污染物,选项按钮组显示铅和苯酚,然后点击铅,左边表格只显示污染物是铅的对应数据,点击苯酚则显示污染物为苯酚的数据,其他也是一样。现在命令按钮组已经搞定,但是选项按钮组怎么控制表格数据显示一直出问题,求大神帮助。
搜索更多相关主题的帖子: 污染物 制作 
2016-10-25 09:51
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:0 
按 污染物名称=="铅"(或苯酚) 过滤一下再刷新表格。
2016-10-25 10:01
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:0 
看看你代码写哪了
2016-10-25 17:29
hepingfly
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:195
专家分:657
注 册:2015-5-21
收藏
得分:0 
简单的讲:预设4个参数,每一个红框内的command 按钮或选项组按钮,在点击后都要得到某一个参数的值。在查询按钮里,将4个参数,组合成一个'查询条件',用 select * from 原表 where 查询条件的方式, 生成表格的数据源,刷新grid .

星际花草
2016-10-25 21:58
lky547377578
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2016-10-25
收藏
得分:0 
回复 4楼 hepingfly
能不能把查询代码写出来,不知道要怎么筛选
2016-10-27 17:13
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 
以下是引用lky547377578在2016-10-27 17:13:38的发言:

能不能把查询代码写出来,不知道要怎么筛选

可以重点看一下select语句的用法。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2016-10-27 20:24
wzxc
Rank: 9Rank: 9Rank: 9
来 自:齐鲁大地
等 级:贵宾
威 望:39
帖 子:985
专家分:1296
注 册:2006-4-25
收藏
得分:5 
参考一个简单的例子
test.rar (4.96 KB)

认真看书学习,弄通Fox主义。
2016-10-27 21:04
lky547377578
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2016-10-25
收藏
得分:0 
回复 6楼 hu9jj
我写的代码:
n=This.value
do case
  case n=1
    select all from ThisForm.grd输水干渠表 where 污染物名称 == "铅"
    thisform.refresh
  case n=2
    select all from ThisForm.grd输水干渠表 where 污染物名称 == "苯酚"
    thisform.refresh
endcase
但是运行后总是弹出一个对话框,让你自己选择是哪个表格,然后就改了代码
n=This.value
do case
  case n=1
    select all from ThisForm.grd输水干渠表 where 污染物名称 == "铅" into cursor temp
    thisform.grid1.recordsourcetype=1
    thisform.grid1.recordsource=temp
  case n=2
    select all from ThisForm.grd输水干渠表 where 污染物名称 == "苯酚" into cursor temp
    thisform.grid1.recordsourcetype=1
    thisform.grid1.recordsource=temp
endcase
thisform.refresh
但是还是不行,求大神指点一下!
2016-10-27 21:33
hepingfly
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:195
专家分:657
注 册:2015-5-21
收藏
得分:15 
楼上的代码是行不通的。因为搞混了显示用的数据源。再:没有看到你的原始表,而且只举例了'污染物名称 == "铅或苯酚,这是点击了哪个command 按钮进行了查询?点击各个 command 查询条件是什么?optiongroup 框是否是固定显示的,还是有隐藏的时候?此框内的选项条件名称是否是固定的‘铅或苯酚’还是可变的?只有知道了这些,才可以给出一个表单或代码的详细例子。

星际花草
2016-10-27 22:34
lky547377578
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2016-10-25
收藏
得分:0 
回复 9楼 hepingfly
能不能留个QQ号,方便请教大神,本人QQ547377578。
2016-10-28 19:34
快速回复:vfp表单怎么选择表格数据显示
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.026818 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved