VBA編譯時提示框架內代碼缺少語句,為何?
作者:金字塔 來源:cxh99.com 發布時間:2016年03月17日
- 咨詢內容:
編寫一個自定義函數,在編譯時提示‘1024’錯誤,顯示Technic框架內代碼缺少語句,顯示如下:
1 '由于框架內的代碼作用于全局,并且不會隨著工程項目切換,2 '因此建議框架對象內的代碼只編寫與本框架事件有關的代碼,不要使用作用于整個工程的變量及過程函數。34 Sub MainFrame9_ChangeStock(Grid, Code, Market, Result)5 if MoreCyc.HasVisible = 1 then6 call morecyc.GetGridByName("Window1").ChangeStock(code,market)7 call morecyc.GetGridByName("Window5").ChangeStock(code,market)8 call morecyc.GetGridByName("Window2").ChangeStock(code,market)9 call morecyc.GetGridByName("Window7").ChangeStock(code,market)10 call morecyc.GetGridByName("Window8").ChangeStock(code,market)11 call morecyc.GetGridByName("Window9").ChangeStock(code,market)12 call morecyc.GetGridByName("Window3").ChangeStock(code,market)13 call morecyc.GetGridByName("Window6").ChangeStock(code,market)14 call morecyc.GetGridByName("Window4").ChangeStock(code,market)15 morecyc.InitAllGrid16 end if17 End Sub1819 Sub Technic_RemoveFormula(Grid, FormulaName, Result)20
if Grid.name = "Main" and FormulaName = "MAIN" then21
result = 122
end if23 End Sub
提示第9行出錯。但是我并沒有對框架代碼進行過編輯,這是什么原因?
另外,現在VBA的調試菜單怎么調不出來了?
- 金字塔客服:
檢查一下是否存在Window7這個窗格
- 用戶回復:
沒有,而且把整個1—23行都注釋掉之后編譯還提示編譯器錯誤‘1024’,真是奇怪了
- 網友回復:
當我把Technic框架本項目移除后,就會顯示另一個框架代碼在第三行缺少語句,一直編譯不成功
- 網友回復:
可能是VBA的工程代碼被你給改亂了,建議你重新新建一個VBA的項目工程,讓系統重新初始化VBA的環境狀態