Question

这个代码哪错了？按键精灵读取两个文本中随机一行并输出

新手小白， 请教程各位大神。说得容易理解一点。谢谢 Dim i,i2 'Text读入的文本内容，每行以"|"分隔 Text = Plugin.File.ReadFileEx("C:\1.txt") Text2 = Plugin.File.ReadFileEx("C:\2.txt") '按行分割内容吗，StrArray是一个数组，每个元素就是一行内容 StrArray = Split(Text, "|") StrArray2 = Split(Text2, "|") Randomize i = Int(UBound(StrArray) * Rnd) i2 = Int(UBound(StrArray2) * Rnd) 'UBound为数组最大可用下标 SayString StrArray(i) SayString StrArray2(i2)自己动手，丰衣足食。感谢各位。己自己搞定。

Answer 1

随机文本应该是下面代码：
i
=
Int((-
1
-
UBound(StrArray)
+
1)
*
Rnd
+
UBound(StrArray))
i2
=
Int((-
1
-
UBound(StrArray2)
+
1)
*
Rnd
+
UBound(StrArray2))
复制上面的代码替换就好了。