fill 加载表动态增加列并计算 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → fill 加载表动态增加列并计算

共有4266人关注过本帖平板打印复制链接主题：fill 加载表动态增加列并计算

don

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

等级：八尾狐帖子：1812 积分：12993 威望：0 精华：14 注册：2008/10/11 18:07:00

Post By：2014/3/20 23:32:00 [只看该作者]

试试DateDiff

Dim sql ,Filter as string

Filter ="" '你的条件

sql = "select 归属门店代号,VIP卡号, MAX(消费日期) As 最后购买日期, DateDiff('d',MAX(消费日期),date()) As 多久没来购买 FROM "

sql+="(rjsytVIP消费信息 LEFT JOIN rjsytVIP基本信息 ON (卡号 = VIP卡号 )) GROUP BY VIP卡号, 归属门店代号 Where " & Filter

DataTables("VIP行为信息_VIP行为信息").Fill(sql,"VIP数据", True)

总数 13 1 2 下一页

主题：fill 加载表动态增加列并计算