怎么样比较时间???
我测出现在系统的时间,然后跟一个给定的时间比较,但相等时就做某件事:
Sub look_now_time()
Dim now_time As Date
now_time = Now
now_time = Format(now_time, "HH:mm:ss")
If now_time = "23:00:00" Then
Call something
End If
End Sub
为什么这样不行
问题点数:0、回复次数:4Top
1 楼hemeijun81(@_@ 河马 @_@)回复于 2003-11-02 18:31:31 得分 0
Sub look_now_time()
Dim now_time As Dat
now_time = Format(now(), "HH:mm:ss")
If now_time = now() Then
Call something
End If
End SubTop
2 楼daymj()回复于 2003-11-02 21:12:10 得分 0
好象这句有问题
If now_time = "23:00:00" Then
日期比较要用#号
Top
3 楼kellymax(kellymax)回复于 2003-11-02 21:25:02 得分 0
晕。。。请问这不是明显的DATA TYPE不一致吗?Top
4 楼yzhjisji(知识就是力量)回复于 2003-11-03 20:13:28 得分 0
纯属语法错误Top




