各位领导好：
我用wincc7.0做一个月报，现想为一个变量每个月定时清一次零。我写了一段VBS，但变量总是不停的加，请各位指出原因：
Dim TM1
Dim TM2
Dim TM3
Dim TM4
Set TM1=HMIRuntime.Tags("time1")
Set TM2=HMIRuntime.Tags("time2")
Set TM3=HMIRuntime.Tags("time3")
Set TM4=HMIRuntime.Tags("time4")
TM1.Value=CStr(Day(Now))
TM1.Write
TM2.Value=CStr(Hour(Now))
TM2.Write
TM3.Value=CStr(Minute(Now))
TM3.Write
TM4.Value=CStr(Second(Now))
TM4.Write
If TM1.Value=16 & TM2.Value=20 & TM3.Value=30 & TM4.Value=0 Then
HMIRuntime.Tags("n").Write 0
End If
最佳答案
可以用求时间差的函数DateDiff,如：
if DateDiff("s", now, "2011-3-16 20:30:00")<=2 then
HMIRuntime.Tags("n").Write 0
end if
第二个时间参数你可以用变量取代成你需要的时间，DateDiff("s", “”"time1", "time2")函数参数S表示求秒的差数。
提问者对于答案的评价：
谢谢,分给你了,解决了
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc266700.html
微信扫一扫 
支付宝扫一扫