用vbs如何将年月日连起来。

Dim Begin_nian0
Set Begin_nian0 = HMIRuntime.Tags("Begin_nian")
Begin_nian0.Read 
Dim Begin_yue0
Set Begin_yue0 = HMIRuntime.Tags("Begin_yue")
Begin_yue0.Read 
Dim Begin_ri0
Set Begin_ri0 = HMIRuntime.Tags("Begin_ri")
Begin_ri0.Read 
Dim Begin_shi0
Set Begin_shi0 = HMIRuntime.Tags("Begin_shi")
Begin_shi0.Read 
Dim Begin_fen0
Set Begin_fen0 = HMIRuntime.Tags("Begin_fen")
Begin_fen0.Read 
Dim Begin_miao0
Set Begin_miao0 = HMIRuntime.Tags("Begin_miao")
Begin_miao0.Read 
建立了6个输入输出域,分别连接年,月,日,时,分,秒,如何将6个数字连接起来赋值给UTCBeginTime?
下面错在哪里,为什么什么也没有?
UTCBeginTime = Year(Begin_nian0) & "-" & Month(Begin_yue0) & "-" & Day(Begin_ri0) & " " & Hour(Begin_shi0-8) & ":" & Minute(Begin_fen0) & ":" & Second(Begin_miao0)
MsgBox UTCBeginTime

最佳答案

你定义的这些变量实际是对象变量而不是字符串变量,取得值要用对象的Value属性
UTCBeginTime = Year(Begin_nian0.Value) & "-" & Month(Begin_yue0.Value) & "-" & Day(Begin_ri0.Value) & " " & Hour(Begin_shi0.Value) & ":" & Minute(Begin_fen0.Value) & ":" & Second(Begin_miao0.Value)
另外小时直接减8当实际小时小于8时就是负值了,可以用DateAdd函数
Msgbox DateAdd("h",-8,UTCBeginTime)

提问者对于答案的评价:
谢谢了

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

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2019年6月10日
下一篇 2019年6月10日

相关推荐

  • wincc vbs 调试

    有什么调试vbs的技巧,我用vbs编脚本运行后,明明是错误的也没反应,而且我已经把vbs排错选项勾了,脚本调试工具也装了,感觉wincc就是没有vb调试方便,启动关闭都要等好一会,…

    SIMATIC WinCC 2019年6月11日
  • 博途的定时器当前时间怎么放到wincc上显示?

    博途的定时器ET为time格式,wincc上没找到这个格式,怎么做才能在wincc上显示? 最佳答案 参考文档:如何在WinCC项目中监控S7 300/400 …

    SIMATIC WinCC 2020年11月1日
  • wincc中I/O域内输入字符串填满时应用属性

    请教大侠:  选择字符串在I/O域内输入时,想使用填满时应用属性来自动跳到下个I/O域,但不知道怎么设置填满的条件(但选择十进制输入时在输出格式时设置即可)请大…

    SIMATIC WinCC 2020年11月1日
  • HMI写给DB块数据

    用HMI给DB块写数据,HMI写一个就直接赋值给DB块了,我要写几个数据给DB块,能否用一个发送按键,按下后再将几个数据同时发送给DB块! 最佳答案 写个脚本吧,HMI把值先给内部…

    SIMATIC WinCC 2021年7月5日
  • wincc V7.4 web浏览器

    请问wincc v7.4 的web浏览器安装包去哪里下载。请大神指教。 最佳答案 安装WinCC的时候勾选这个选件即可安装;该选件包含在WinCC的安装包中; …

    SIMATIC WinCC 2021年7月5日
  • wincc6.2打开项目出错

    机器新装了wincc62,新建一个项目后,退出wincc,再次激活wincc后提示数据库连接无效,项目打不开,请高手指教  sql是英文版 wincc…

    SIMATIC WinCC 2019年6月11日
  • Wincc6.0组态报警控件,运行显示“没有到数据库服务器的连接”

    SQL SERVER安装正常 机器名\wincc 服务启动正常 在一个窗口中,使用了报警控件,运行就显示标题的信息 我的电脑没有连…

    SIMATIC WinCC 2019年6月11日
  • WINCC62中如何记录模拟值报警

    我用300读取仪表重量,在WINCC中对该重量做存盘、实时历史查询!同时监视该模拟值,越限报警!用限制值监控可以吗?请详细说下步骤和作法!!非常感谢 问题补充:能实现,上下限报警同…

    SIMATIC WinCC 2019年6月11日
  • WINCC变量记录1

    目的:想对某变量求出平均值或总和,生成到报表中.做个变量记录,想求出该变量的平均值或总和,能否在变量记录—归档—归档名称–变量名—属性—选择平均值或总和?我在报表…

    SIMATIC WinCC 2019年6月11日
  • SIMATIC WinCC flexible 2007怎么把组态好的传到面板上?

    组态已经组好了,现在要传到面板上,触摸屏是MP370,我在官网上看到可以用以太网,串口,DP,USB,我也按照步骤做的,可就是传不到面板上。 有高手能指点下吗? 最佳答案…

    SIMATIC WinCC 2019年6月11日