| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1027 人关注过本帖
标题:vfp代码求助:单选按钮组,以及查询按钮的代码
只看楼主 加入收藏
lygzy22
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2011-5-18
结帖率:0
收藏
 问题点数:0 回复次数:6 
vfp代码求助:单选按钮组,以及查询按钮的代码
根据表格内容:根据是否出售的表格信息,在单选按钮组中选择“已出售”,点击后面的“查询”按钮,表格内容就出现已出售信息的相关内容,在单选按钮组中选择“未出售”,点击后面的“查询”按钮,表格内容就出现未出售信息的相关内容。在单选按钮组中选择“全部”,点击后面的“查询”按钮,表格内容就出现全部信息。
图片附件: 游客没有浏览图片的权限,请 登录注册
搜索更多相关主题的帖子: 表格 
2011-05-18 20:22
wzxc
Rank: 9Rank: 9Rank: 9
来 自:齐鲁大地
等 级:贵宾
威 望:39
帖 子:985
专家分:1296
注 册:2006-4-25
收藏
得分:0 
SET FILTER TO

认真看书学习,弄通Fox主义。
2011-05-18 21:32
ilikeflash
Rank: 3Rank: 3
等 级:论坛游侠
威 望:3
帖 子:148
专家分:186
注 册:2011-4-6
收藏
得分:0 
三个单选按钮组的值分别为1(已出售),2(未出售),3(全部),所以查询按键 应用分支查询命令进行记录的筛选显示,如:
do case
case thisform.OptionGroup1.value=1
select...
case thisform.OptionGroup1.value=2
select...
case thisform.OptionGroup1.value=3
select....
endcase
2011-05-18 21:50
lygzy22
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2011-5-18
收藏
得分:0 
这个答案试过了,不能用,会出错
并且表格会变成空的
2011-05-19 08:53
ilikeflash
Rank: 3Rank: 3
等 级:论坛游侠
威 望:3
帖 子:148
专家分:186
注 册:2011-4-6
收藏
得分:0 
哈,会成空滴。那是因为grid1没有数据源啦。你在用select..查询到一个cursor游标里之后,设置thisform.grid1.RecordSource='临时表名'就可以啦,而且每一个case里都要这样设置一下才行呀。
2011-05-20 12:34
ilikeflash
Rank: 3Rank: 3
等 级:论坛游侠
威 望:3
帖 子:148
专家分:186
注 册:2011-4-6
收藏
得分:0 
噢,出错可能是没有设置Grid.RecordSourceType的属性所至,设Grid.RecordSourceType=0
2011-05-20 12:37
wzxc
Rank: 9Rank: 9Rank: 9
来 自:齐鲁大地
等 级:贵宾
威 望:39
帖 子:985
专家分:1296
注 册:2006-4-25
收藏
得分:0 
没那么复杂。


select yourtablename
do case
case thisform.OptionGroup1.value=1
set filter to 出售信息="已出售"
go top
case thisform.OptionGroup1.value=2
set filter to 出售信息="未出售"
go top
case thisform.OptionGroup1.value=3
set filter to
go top
endcase
thisform.refresh

认真看书学习,弄通Fox主义。
2011-05-20 19:15
快速回复:vfp代码求助:单选按钮组,以及查询按钮的代码
数据加载中...
 
   



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

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