| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1279 人关注过本帖
标题:vfp中表在表单中设置四个查找条件?
只看楼主 加入收藏
谈建红
Rank: 2
等 级:论坛游民
帖 子:61
专家分:17
注 册:2012-11-9
收藏
得分:0 
我在测试

2012-11-09 20:55
谈建红
Rank: 2
等 级:论坛游民
帖 子:61
专家分:17
注 册:2012-11-9
收藏
得分:0 
在下想结识各路英雄.QQ565314318
2012-11-09 20:55
谈建红
Rank: 2
等 级:论坛游民
帖 子:61
专家分:17
注 册:2012-11-9
收藏
得分:0 
public a,b,c
a=rq>= .and.rq<=
b=jsr=
DO CASE
   CASE thisform.optiongroup2.value=1
        c=thisform.optiongroup2.option1.caption
   CASE thisform.optiongroup2.value=2
        c=thisform.optiongroup2.option2.caption     
   CASE thisform.optiongroup2.value=3
        c=thisform.optiongroup2.option3.caption
   CASE thisform.optiongroup2.value=4
        c=thisform.optiongroup2.option4.caption
  CASE thisform.optiongroup2.value=5
        c=thisform.optiongroup2.option5.caption
   CASE thisform.optiongroup2.value=6
        c=thisform.optiongroup2.option6.caption     
   CASE thisform.optiongroup2.value=7
        c=thisform.optiongroup2.option7.caption
   CASE thisform.optiongroup2.value=8
        c=thisform.optiongroup2.option8.caption
   CASE thisform.optiongroup2.value=9
        c=thisform.optiongroup2.option9.caption
   CASE thisform.optiongroup2.value=10
        c=thisform.optiongroup2.option10.caption     
   CASE thisform.optiongroup2.value=11
        c=thisform.optiongroup2.option11.caption
   CASE thisform.optiongroup2.value=12
        c=thisform.optiongroup2.option12.caption
   CASE thisform.optiongroup2.value=13
        c=thisform.optiongroup2.option13.caption
   CASE thisform.optiongroup2.value=14
        c=thisform.optiongroup2.option14.caption     
   CASE thisform.optiongroup2.value=15
        c=thisform.optiongroup2.option15.caption
   CASE thisform.optiongroup2.value=16
        c=thisform.optiongroup2.option16.caption
        
   CASE thisform.optiongroup2.value=17
        c=thisform.optiongroup2.option17.caption
   CASE thisform.optiongroup2.value=18
        c=thisform.optiongroup2.option18.caption     
   CASE thisform.optiongroup2.value=19
        c=thisform.optiongroup2.option19.caption
   
ENDCASE   



sele * from zjtzb where rq=c and jsr=b and xlb=c
go top
thisform.refresh
2012-11-09 21:08
谈建红
Rank: 2
等 级:论坛游民
帖 子:61
专家分:17
注 册:2012-11-9
收藏
得分:0 
图片附件: 游客没有浏览图片的权限,请 登录注册
2012-11-09 21:09
谈建红
Rank: 2
等 级:论坛游民
帖 子:61
专家分:17
注 册:2012-11-9
收藏
得分:0 
[local]1[/local]时间是日期类型
2012-11-09 21:14
wjp456789
Rank: 5Rank: 5
来 自:四川成都
等 级:职业侠客
威 望:1
帖 子:345
专家分:330
注 册:2012-6-25
收藏
得分:0 
用四个变量吧
a1=ctod()
a2=ctod()
b=
DO CASE
   CASE thisform.optiongroup2.value=1
        c=thisform.optiongroup2.option1.caption
   CASE thisform.optiongroup2.value=2
        c=thisform.optiongroup2.option2.caption     
   CASE thisform.optiongroup2.value=3
        c=thisform.optiongroup2.option3.caption
   CASE thisform.optiongroup2.value=4
        c=thisform.optiongroup2.option4.caption
  CASE thisform.optiongroup2.value=5
        c=thisform.optiongroup2.option5.caption
   CASE thisform.optiongroup2.value=6
        c=thisform.optiongroup2.option6.caption     
   CASE thisform.optiongroup2.value=7
        c=thisform.optiongroup2.option7.caption
   CASE thisform.optiongroup2.value=8
        c=thisform.optiongroup2.option8.caption
   CASE thisform.optiongroup2.value=9
        c=thisform.optiongroup2.option9.caption
   CASE thisform.optiongroup2.value=10
        c=thisform.optiongroup2.option10.caption     
   CASE thisform.optiongroup2.value=11
        c=thisform.optiongroup2.option11.caption
   CASE thisform.optiongroup2.value=12
        c=thisform.optiongroup2.option12.caption
   CASE thisform.optiongroup2.value=13
        c=thisform.optiongroup2.option13.caption
   CASE thisform.optiongroup2.value=14
        c=thisform.optiongroup2.option14.caption     
   CASE thisform.optiongroup2.value=15
        c=thisform.optiongroup2.option15.caption
   CASE thisform.optiongroup2.value=16
        c=thisform.optiongroup2.option16.caption
        
   CASE thisform.optiongroup2.value=17
        c=thisform.optiongroup2.option17.caption
   CASE thisform.optiongroup2.value=18
        c=thisform.optiongroup2.option18.caption     
   CASE thisform.optiongroup2.value=19
        c=thisform.optiongroup2.option19.caption
   
ENDCASE   



sele * from zjtzb where rq>a1 and rq<a2 and jsr=b and xlb=c
go top
thisform.refresh

其中rq,jsr,xlb是你表里的字段哈

[ 本帖最后由 wjp456789 于 2012-11-9 21:16 编辑 ]

我是来向高手学习的!
2012-11-09 21:15
谈建红
Rank: 2
等 级:论坛游民
帖 子:61
专家分:17
注 册:2012-11-9
收藏
得分:0 
首先谢谢!我支测试
2012-11-09 21:23
谈建红
Rank: 2
等 级:论坛游民
帖 子:61
专家分:17
注 册:2012-11-9
收藏
得分:0 
成功了!谢谢!
2012-11-09 21:30
谈建红
Rank: 2
等 级:论坛游民
帖 子:61
专家分:17
注 册:2012-11-9
收藏
得分:0 
查出来的是弹出的一个表而不是在GRID中显示的
2012-11-09 21:31
wjp456789
Rank: 5Rank: 5
来 自:四川成都
等 级:职业侠客
威 望:1
帖 子:345
专家分:330
注 册:2012-6-25
收藏
得分:0 
呵呵。家庭小账本。。。
做好后可否共享一下。大家用用。再帮你提点修改意见。
共同学习噻

我是来向高手学习的!
2012-11-09 21:32
快速回复:vfp中表在表单中设置四个查找条件?
数据加载中...
 
   



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

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