用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日 下午8:48
下一篇 2019年6月10日 下午8:49

相关推荐

  • web客户端访问WINCC数据库的问题

    WEB客户机用光盘,向导安装了"连通性软件包客户端"(选择软件包时一些附属组件也自动装上了,包括SMATIC NET组件),WINCC服务器和WEB客…

    SIMATIC WinCC 2019年6月11日
  • 获取版本号,IP地址,修改日期

    WINCC中有没有提供获取项目的版本号、修改日期以及系统IP的函数呢? 问题补充:我是想用脚本获取这些信息。目前查到在SQL数据库表中有这些信息。 最佳答案 项目的版本号是啥?目前…

    SIMATIC WinCC 2021年7月5日
  • 搅拌机怎么能让他实现动态效果

    1.搅拌电机怎么让他实现动态效果?哪里能下载到他的动态控件? 2.在wincc中怎么用c脚本按一次按钮给一个变量+1或-1。(假如有两个按钮分别是加和减按钮。现在变量的数…

    SIMATIC WinCC 2019年6月11日
  • WINCC6.0用户周期

    使用WINCC6.0中的趋势图控件作了一个监控画面,选择在线变量时将周期选为用户周期1(设为100MS),运行后趋势图无数据显示,设为250MS有显示,但达不到精度要求。恳求高手解…

    SIMATIC WinCC 2019年6月11日
  • SMART 700 IE v3如何跳转到刚上电的界面

    SMART 700 IE v3如何跳转到刚上电的界面 可以通过调用哪一个函数实现 钻石用户推荐最佳答案 SMART 700&nbs…

    SIMATIC WinCC 2021年7月5日
  • wincc7.3运行很慢

    今天电脑重装了系统(之前是32位的,现在是64位系统),然后重装wincc7.3软件。打开以前的项目运行发现弹出画面的按钮是和以前一样快。其它要执行的按钮却是按下5、6秒后才开始执…

    SIMATIC WinCC 2021年7月5日
  • wincc7.0 sp3 安装系统问题

    我在VMstation虚拟机里面安装这个wincc7.0 SP3 ,打开怎么出现提示本软件不能安装在使用windows XP profess…

    2021年7月5日
  • wincc6.0迁移至7.4

    在wincc7.4上用migration tool 想将6.0升级到7.4,然后就弹出“SQL启动时出错,查看是否像安装wincc一样安装了SQL”,数据库装的…

    SIMATIC WinCC 2021年7月5日
  • 删除WinCC项目

    我在学习WinCC时创建了一些项目,现在我想删除它们,不知如何能完整地删除清楚,包括数据库。 最佳答案 画面(PDL)、组态数据库(.MDF/LDF)、运行数据库(RT.MDF/R…

    SIMATIC WinCC 2019年6月11日
  • wincc 二次表 通讯

    wincc  如何 与外部 多个二次显示表  通讯 ,比如 485 的方式。 问题补充:不…

    SIMATIC WinCC 2017年8月24日