DimEnv Frame(6), TID(6)
Event Form1.Button1.Click
/* 3*3 宮格 解析度 640*376 */
//根據按鍵精靈抓抓句柄定位出視窗句柄
HwndTx = Plugin.Window.SearchEx("LDPlayerMainFrame", "", 0)
HwndL = Split(HwndTx, "|")
For i = 0 To UBound(HwndL) - 1 //開3個視窗則UBound(HwndL)為3
If TID(i) > 0 Then
StopThread TID(i)
TID(i) = -1
End If
Frame(i) = Clng(HwndL(i))
Next
End Event
以上是我代碼的一部分,運行時老是報下標越界,我的理解是這時 i 范圍為 0~2,怎么會越界? 難道下標開始是1開始?
uj5u.com熱心網友回復:
HwndTx = Plugin.Window.SearchEx("LDPlayerMainFrame", "", 0)msgbox hwndtx
HwndL = Split(HwndTx, "|")
msgbox ubound(hwndl)
把紅色的代碼加一下。運行看看。
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/26896.html
標籤:VB基礎類
