VFP菜鸟求高手指点

qq_31403959 2015-09-18 04:27:50

用VFP在FORM中拉3个TEXT框，2个COMBO框，要求满足任意一个或多个条件，点击查询按钮后在GRID中显示出结果，查询来源为SJ表，GRID来源也是SJ表，求高手指点代码。

...全文

63 3 打赏收藏转发到动态举报

写回复

用AI写文章

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

dfwxj 2015-09-18

打赏
举报

弄个通用代码给你吧：五个项目，任意一个有内容则要求该项目完全匹配；为空则忽略该项目。 ss='.T.' ss=ss+iif(empty(thisform.text1.value),'',' and 组织代码==allt(thisform.text1.value)') ss=ss+iif(empty(thisform.text2.value),'',' and 单位名称==allt(thisform.text2.value)') ss=ss+iif(empty(thisform.text3.value),'',' and 街镇==allt(thisform.text3.value)') ss=ss+iif(empty(thisform.combo1.displayvalue),'',' and 年=thisform.combo1.displayvalue') ss=ss+iif(empty(thisform.combo2.displayvalue),'',' and 年=thisform.combo2.displayvalue') sele sj set filt to &ss go top thisform.grid1.refresh

dfwxj 2015-09-18

打赏
举报

第五个条件没改一下，应该是“月” ss='.T.' ss=ss+iif(empty(thisform.text1.value),'',' and 组织代码==allt(thisform.text1.value)') ss=ss+iif(empty(thisform.text2.value),'',' and 单位名称==allt(thisform.text2.value)') ss=ss+iif(empty(thisform.text3.value),'',' and 街镇==allt(thisform.text3.value)') ss=ss+iif(empty(thisform.combo1.displayvalue),'',' and 年=thisform.combo1.displayvalue') ss=ss+iif(empty(thisform.combo2.displayvalue),'',' and 月=thisform.combo2.displayvalue') sele sj set filt to &ss go top thisform.grid1.refresh