Question

按键精灵中下标越界怎么解决啊？

Hwnd = Plugin.Window.Find(0, "自由幻想")
sRect = Plugin.Window.GetClientRect(Hwnd)
Dim myarray
myarray=Split(rect,"|")
ux=clng(myarray(0))
uy=clng(myarray(1))

第5行：下标越界: '[number: 0]',
第6行：下标越界: '[number: 1]',

Answer 1

第四行myarray=Split(rect,"|")少了个"s"
改成myarray=Split(srect,"|")就行了
修改如下:
//==============================
Hwnd = Plugin.Window.Find(0, "自由幻想")
sRect = Plugin.Window.GetClientRect(Hwnd)
Dim myarray
myarray=Split(sRect,"|")
ux=clng(myarray(0))
uy=clng(myarray(1))