Time vbscript中时间间隔之间的时间

我试图使用VBScript将读取的时间设置为字符串位于指定时间间隔之间。以下是脚本：

dim splitString，currentTime splitString=Split12 59 00 currentTime=TimeSerialsplitString0、splitString1、splitString2 如果DateAddn，-1，timeIn，您可以使用short

if x <= y < z:
    ...

但是在VBScript中，您需要更长的时间

If x <= y And y < z Then
   ...

在中，您可以使用简短的

if x <= y < z:
    ...

但是在VBScript中，您需要更长的时间

If x <= y And y < z Then
   ...

---

您需要独立地评估这两种情况

dim splitString, currentTime
splitString = Split("3 39 00")
currentTime = TimeSerial(splitString(0),splitString(1), splitString(2))
If (DateAdd("n",-1,time()) <= currentTime) And (currentTime < DateAdd("n", 1,time())) Then 
    Wscript.Echo currentTime
End If  

---

您需要独立地评估这两种情况

dim splitString, currentTime
splitString = Split("3 39 00")
currentTime = TimeSerial(splitString(0),splitString(1), splitString(2))
If (DateAdd("n",-1,time()) <= currentTime) And (currentTime < DateAdd("n", 1,time())) Then 
    Wscript.Echo currentTime
End If  

我用了DateDiff。将IF语句修改为：

如果DateDiffn，DateAddn，-1，time，currentTime=1，DateDiffn，currentTime，DateAddn，1，time=1，则 Echo currentTime 如果结束 工作如期进行

我用了DateDiff。将IF语句修改为：

如果DateDiffn，DateAddn，-1，time，currentTime=1，DateDiffn，currentTime，DateAddn，1，time=1，则 Echo currentTime 如果结束

---

工作如期进行

我敢肯定这件事以前会以这样或那样的形式被问到。我敢肯定这件事以前会以这样或那样的形式被问到。