Foxtable(狐表)用户栏目专家坐堂 → 如何实现打开窗口后日期框1,2显示当前年份月份的起止日期?


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

主题:如何实现打开窗口后日期框1,2显示当前年份月份的起止日期?

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/12 16:29:00 [显示全部帖子]

e.Form.Controls("StartDate").Value = New Date(Year,Month,1)
e.Form.Controls("EndDate").Value = New Date(Year,Month,Date.DaysInMonth(Year,Month))

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/13 9:04:00 [显示全部帖子]

e.Form.Controls("StartDate").Value = New Date(date.today.Year,date.today.YMonth,1)

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/13 13:31:00 [显示全部帖子]

月份单词写错了,自行改改

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/13 16:05:00 [显示全部帖子]

我测试没有问题。提示什么错?

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/13 16:18:00 [显示全部帖子]

同样的改法,参考7楼用法自行改改

 回到顶部