Foxtable(狐表)用户栏目专家坐堂 → 要在周一到周五12:00 ----14:30 分之前做某个事,怎么写代码?


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

主题:要在周一到周五12:00 ----14:30 分之前做某个事,怎么写代码?

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


加好友 发短信
等级:六尾狐 帖子:1218 积分:8451 威望:0 精华:0 注册:2016/2/2 21:52:00
要在周一到周五12:00 ----14:30 分之前做某个事,怎么写代码?  发帖心情 Post By:2018/7/25 15:02:00 [只看该作者]

不要在周一到周五12:00  ----14:30 分之前做某个事(msgbox(1)),怎么写代码?
[此贴子已经被作者于2018/7/25 15:03:42编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/7/25 15:22:00 [只看该作者]

做个计划(定时器),写代码

 

static d1 As Date = Date.today.AddDays(-1)

If d1 <> Date.today AndAlso Date.today.DayOfWeek >= 1 AndAlso Date.today.DayOfWeek <= 5 AndAlso format(Date.Now, "HHmm") >= "1200" AndAlso format(Date.Now, "HHmm") <= "1430" Then
    d1 = Date.today
    msgbox(123)
End If


 回到顶部