UC知道VB 时间问题，急啊。。在线等
来源：百度知道 编辑：UC知道 时间：2024/05/16 03:50:20
本人现在写考勤系统，我的意思是要让上班时间-去半小时的时间。意思就是，假如他的上班时间是8：30就让他在8：00-8：30这时间内可以打考勤其与时间不可以打啊！这样应该怎么写啊！请高手帮忙。。。。
dim h as byte,n as byte
h=datepatr("h",now)
n=datepatr("n",now)
if h=8 and n<=30 then
Command1.Visible = True
else
Command1.Visible =False
end if
Command1是执行考勤的按钮
N=NOW()
H=HOUR(N)
M=MINUTE(N)
IF H=8 THEN
IF M>0 AND M<30 THEN “可以打表”
ELSE “不可以打表”
ELSE "不可以打表"