WinCC VBS 北京时间转UTC时间

Set BeginTime=HMIRuntime.Tags("btime")
    BeginTime.Read
Set EndTime=HMIRuntime.Tags("etime")
    EndTime.Read

Msgbox (BeginTime.value)
Msgbox (EndTime.value)

UTCBeginTime=Dateadd("h",-8,BeginTiem.Value)
UTCBeginTime.read
UTCEndTime=Dateadd("h",-8,EndTime.Value)
UTCEndTime.read

Msgbox (UTCBeginTime.Value)
Msgbox (UTCEndTime.Value)

这是程序的一段,调试的时候,BeginTime和EndTime都输出正确,而UTCBeginTime和UTCendTime不输出,求各位大神点拨。
btime和etime是date变量,时间赋值是通过datepicker 24小时制赋给btime和etime
本机64bit Win7 SP1,WinCC7.3

最佳答案

张版真仔细
您可以这样改试试:
BeginTime=HMIRuntime.Tags("btime").read
EndTime=HMIRuntime.Tags("etime").Read
Msgbox (BeginTime)
Msgbox (EndTime)
UTCBeginTime=Dateadd("h",-8,BeginTime)
UTCEndTime=Dateadd("h",-8,EndTime)
Msgbox (UTCBeginTime)
Msgbox (UTCEndTime)

r如果需要再写进去这样:
HMIRuntime.Tags("btime").write BeginTime
HMIRuntime.Tags("etime").write EndTime
程序看起来能简单很多了~

提问者对于答案的评价:
谢谢RENHUQ的解答,最后自己搞成功了

原创文章,作者:ximenziask,如若转载,请注明出处:https://www.zhaoplc.com/plc363097.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2021年7月5日 下午12:40
下一篇 2021年7月5日 下午12:40

相关推荐

发表回复

登录后才能评论