回 帖 发 新 帖 刷新版面

主题:如何对“时间日期”作比较?

因为要对一批考勤数据做处理,比如某个员工在“2011/1/3  8:29:57”上班签到,规定上班时间为每天“8:30:00”,如何用程序判断此员工是否迟到?怎么对时间作大小比较?

回复列表 (共6个回复)

沙发

直接用
if 实际时间<=规定时间 then
……
else
……
endif
就可以了

板凳

这个“实际时间”是一个什么类型的变量啊?我记得可以声明一个时间日期型的变量,但是太久不用VB了,有点生硬了。

3 楼

其实可以使用format函数提取出时间,然后比较
dim 上班时间,到达时间 as string
到达时间=format(Now,"hh:mm:ss")
if 上班时间>到达时间 then
else
end if

4 楼

你说的对,就是用日期型变量

5 楼

但是,要注意把整数部分舍掉。

6 楼

进入打印预览后vb失去了对excel的控制
如何实现当按下预览窗口的关闭按钮后退出或隐藏excel,
直接返回调用它的vb窗口,而不是返回excel编辑界面.
[url=http://www.oilpaintingsuksale.com]oil paintings[/url]
[url=http://www.oilpaintingsuksale.com]painting oil[/url]
[url=http://www.oilpaintingsuksale.com]painting in oil[/url]
[url=http://www.oilpaintingsuksale.com]oil paints[/url]
[url=http://www.oilpaintingsuksale.com]paint oil[/url]
[url=http://www.oilpaintingsuksale.com]oil on canvas[/url]
[url=http://www.oilpaintingsuksale.com]oil canvas[/url]
[url=http://www.oilpaintingsuksale.com]oil and painting[/url]
[url=http://www.ukdress.co.uk]uk evening dresses[/url]
[url=http://www.ukdress.co.uk]prom dresses uk[/url]
[url=http://www.Laserpointeronsale.com]laser pointers[/url]

我来回复

您尚未登录,请登录后再回复。点此登录或注册