| 作者 | 主题 |
|---|---|
|
刘工TIA 侠圣 经验值:2274 发帖数:224 精华帖:5 |
楼主
主题:请问怎么将分别为年月日时分秒的六个字符串变量组合成时间格式 如题,我建立了六个变量分别让用户输入查询数据库的起始时间(2000-05-01 09:05:00)到终止时间内的变量。请问我如果用六个变量分别表示上述时间格式中的年月日时分秒然后组合成 2000-05-01 09:05:00这样的格式,请问怎么做。 下面是按照例子做的: Set tagDSNName = HMIRuntime.Tags("@DatasourceNameRT") tagDSNName.Read Set LocalBeginTime = HMIRuntime.Tags("strBeginTime") LocalBeginTime.Read Set LocalEndTime = HMIRuntime.Tags("strEndTime") LocalEndTime.Read UTCBeginTime = DateAdd("h" ,-8,LocalBeginTime.Value) UTCEndTime= DateAdd("h" ,-8,LocalEndTime.Value) UTCBeginTime = Year(UTCBeginTime) & "-" & Month(UTCBeginTime) & "-" & Day(UTCBeginTime) & " " & Hour(UTCBeginTime) & ":" & Minute(UTCBeginTime) & ":" & Second(UTCBeginTime) UTCEndTime = Year(UTCEndTime) & "-" & Month(UTCEndTime) & "-" & Day(UTCEndTime) & " " & Hour(UTCEndTime) & ":" & Minute(UTCEndTime) & ":" & Second(UTCEndTime) HMIRuntime.Trace "UTC Begin Time: " & UTCBeginTime & vbCrLf HMIRuntime.Trace "UTC end Time: " & UTCEndTime & vbCrLf Set sVal = HMIRuntime.Tags("sVal") sVal.Read 其中这个strBeginTime就是起始时间的一个字符变量,我要怎么改写上述代码,让六个变量替代这个例子中的一个变量呢。 |