編譯器錯誤

作者：金字塔來源：cxh99.com 發布時間：2016年08月14日

咨詢內容：
提示這個是什么原因，程序應該沒錯誤，只是回測時會經常在某個地方（地方并不固定，有時候是這個日期，有時候是另一個日期）斷了，然后跳出這個提示。
金字塔客服：
看一下具體出錯的代碼行附近都有哪些代碼。

通常出現這個錯誤可能是系統內部錯誤導致的，常見是內存不足了，或者你VBS代碼頻繁申請釋放內存，或者是你使用了被你釋放的對象等等
用戶回復： Sub sts1()
Set Grid = Technic.GetGridByName("Main")
call Grid.ChangeStock("XHAU","XH")
call Grid.ChangeCyc(1, 1)
Set objExcel = CreateObject("Excel.Application")
With objExcel
.Visible = True
.Workbooks.Open("C:\Users\wei.zhou\Desktop\b60.xlsx")
Set History = Grid.GetHistoryData()
n=2
for i =0 to History.Count-10
    if n<History.Count then

           .Cells(n,1).value = History.date(i)
           n=n+1

    end if

next
end with
end sub
我把代碼簡化了，還是出現了這個錯誤呀，上面的這個不應該出現這個錯誤吧，
網友回復：
是不是頻繁調用這個過程函數導致的問題，excel你是不能去頻繁的打開和關閉的
網友回復： 沒有頻繁打開EXCEL呀，只是會頻繁的把一些價格信息寫入EXCEL