Vbscript 如何让HTA应用程序接受命令行参数？

当我运行HTA应用程序时，我得到：

命令未定义

---

我正在尝试制作一个HTA应用程序（可选）。

您的脚本部分包含一条语句。这使得必须在使用变量之前定义变量。在程序中添加一行

命令，i

：

Sub Window_onLoad
    arrCommands = Split(ITTool.commandLine, chr(34))
    For i = 3 to (Ubound(arrCommands) - 1) Step 2
        MsgBox arrCommands(i)
    Next
End Sub

子窗口\u加载
我没有命令
arrcomands=Split（ITTool.commandLine，chr（34））
对于i=3至（Ubound（ARR命令）-1）步骤2
MsgBox命令（i）
下一个
末端接头

Sub Window_onLoad
    Dim arrCommands, i
    arrCommands = Split(ITTool.commandLine, chr(34))
    For i = 3 to (Ubound(arrCommands) - 1) Step 2
        MsgBox arrCommands(i)
    Next
End Sub