首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

date方面得小疑点

2012-02-17 
date方面得小问题不知道该怎么问,所以举个例form上optiongroup里有两个option(昨日资料,今日资料)点选昨日

date方面得小问题
不知道该怎么问,所以举个例

form上

option   group里有两个option(昨日资料,今日资料)

点选昨日资料会显示昨日日期的资料在grid上
点选今日资料会显示今日日期的资料在grid上

现在做一个输出报表的button,要如何让option选在昨日的时候,点列印button
输出昨日日期的资料,点在今日日期option时输出列印今日资料呢!?


下段是我输出报表button的程式...要怎么改才能对应option的点选

select     工作日志
thisform.oldrecord   =   recno()
set   filter   to   dairy_date   =   DATE()
report     form     dairy_des   noconsole     preview
select     工作日志
go   thisform.oldrecord



[解决办法]
出报表button的程式

select 工作日志
report form dairy_des noconsole preview
go thisform.oldrecord


option group的Click事件:
select 工作日志
IF THIS.VALUE=1
set filter to dairy_date = DATE()-1
ELSE
set filter to dairy_date = DATE()
ENDIF
THISFORM.GRID1.REFRESH

热点排行