关于日期提醒的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于日期提醒的问题

共有2001人关注过本帖树形打印复制链接主题：关于日期提醒的问题

裴保民

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：八尾狐帖子：1995 积分：12690 威望：0 精华：0 注册：2017/4/3 15:01:00

关于日期提醒的问题 发帖心情

Post By：2017/12/29 15:43:00 [只看该作者]

Dim llkdt As Integer = Tables("提醒时间设置").Current("流量卡失效提前提醒天数设置")

Dim Ldt As Date = Date.Today.AddDays(llkdt)

Tables("提醒窗体_Table1").AllowEdit = False

Tables("提醒窗体_Table1").filter= "流量卡有效期至<= #" & Ldt & "# and 是否可以续费 = true"

这样设置会出现流量卡到期后如果卡的性质是可以续费的，他就一直提醒，怎么设置提前几天开始提醒，经过提醒一段时间后就不在提醒了呢？

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2017/12/29 15:49:00 [只看该作者]

比如可以这样

Tables("提醒窗体_Table1").filter= "流量卡有效期至 >= #" & date.today & "# and 流量卡有效期至<= #" & Ldt & "# and 是否可以续费 = true"

主题：关于日期提醒的问题