Foxtable(狐表)用户栏目专家坐堂 → [求助]做一个值班排班提醒系统,遇到问题,请专家解决一下,谢谢


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

主题:[求助]做一个值班排班提醒系统,遇到问题,请专家解决一下,谢谢

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


加好友 发短信
等级:狐精 帖子:3215 积分:21361 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2023/4/3 11:48:00 [显示全部帖子]

就是解决今天的日期问题啊,你用什么显示的,比如用Lable在出界面放一个lable,就这样写:
Dim lbl As WinForm.Label = e.Form.Controls("当前时间")
lbl.Text ="今天是:" & format(Date.Now, "yyyy年MM月dd日 dddd HH:mm:ss")
当然相同的代码也需要写到计时器或是计划管理写一遍,刷新速度为1秒。
其他问题就是找值班日期与当前日期进行比较,符合条件的行显示出来就行了,
[此贴子已经被作者于2023/4/3 11:49:12编辑过]

 回到顶部