Vbscript 如何传递变量？

我创建如下代码。我想将变量

rand

和

rand

传递到

iret = iim2.iimPlay("rand")
iret = iim1.iimPlay("randd")

如何做到这一点

Set iim1= CreateObject ("imacros")
Set iim2= CreateObject ("imacros")

Dim max,min,rand,randd,maxx,minn
max=2
min=15
Randomize
rand = Int((max-min+1)*Rnd+min)
WScript.Echo rand

maxx=2
minn=15
Randomize
randd = Int((maxx-minn+1)*Rnd+minn)
WScript.Echo randd

For m = 1 to 1
  iim1.iimInit("-fx -fxProfile t2")
  iim2.iimInit("-cr")

  iret = iim2.iimPlay("rand")
  iret = iim1.iimPlay("randd")

  iret = iim2.iimExit()
  iret = iim1.iimExit()
Next

删除引号：

iret = iim2.iimPlay(rand)
iret = iim1.iimPlay(randd)

---

VBScript不展开引号中的变量，因此

“rand”

作为文本字符串“rand”传递，而不是变量

rand

的值。简短回答：删除引号，如下所示：

iret=iim2.iimPlay（兰特）

iret=iim1.iimPlay（随机数）

您正在传递名为“rand”和“randd”的字符串。变量不包含在引号中。 此外，您正在两次构造同一对象（iret），我不知道为什么。

---

您可能还有其他问题，但这是一个好的开始。

VB.NET&VBScript和完全不同的东西（删除了VB.NET标记）。