作者:AndreaDittis | 来源:互联网 | 2023-02-09 09:30
我不知道为什么这段代码不起作用:
Dim a
a = InputBox("What time do you want?")
If InStr(a, "pm") Then
(Replace(a, "pm", ""))
a = a + 12
c = MsgBox(a, 0, Time)
WScript.Quit
Else
End If
b = MsgBox(a & form, 0, "L")
每当我尝试启动它时,它会响应:
"错误:预期声明"
是因为Replace
声明不正确还是因为脚本的其余部分出现了错误?
1> Lankymart..:
当您尝试运行该代码时,您应该收到以下错误
Microsoft Vbscript编译错误:预期语句
第4行
这将导致你成为罪魁祸首
(Replace(a, "pm",""))
这不是Vbscript中的有效语句,因此错误.
根据您要执行的操作,脚本需要返回Replace()
函数调用的结果,如下所示
a = Replace(a, "pm","")