Foxtable(狐表)用户栏目专家坐堂 → 日期自动显示一个月


  共有1942人关注过本帖树形打印复制链接

主题:日期自动显示一个月

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/11/7 21:41:00 [显示全部帖子]

代码改为

For i As Integer = 1 To 31
    DataTables("表A").DataCols("日" & i).caption = format(Date.Today.AddDays(i-1), "MM-dd")
Next
DataTables("表A").BuildHeader

 回到顶部