以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  高级功能研发区  (http://www.weistock.com/bbs/list.asp?boardid=5)
----  编译提示“打开文档”错误  (http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=138836)
--  作者：分析者
--  发布时间：2016/8/29 9:20:40
--  编译提示“打开文档”错误

 sub  baoh()

    Set Grid = Technic.GetGridByName("Main")

    Set History = Grid.GetHistoryData()

    call Grid.InsertFormula("公式1",-1)\'

    Grid.ReInitDataFormula\'重新刷新窗格内公式

    set Formula = grid.GetFormulaByName("公式1")

    ReDim ccc(history.count)

    for n1=1 to  history.count-1

      ccc(n1)= history.high(n1)

    next

    formula.VARDATA("bao") = ccc \'将处理完毕的数组序列返回公式中

   

 end sub

   编译会提示错误：“编译器错误 61704 打开文档”，光标停留在上述黄色处。

请问如何处理？ 
--  作者：分析者
--  发布时间：2016/8/30 10:09:57
--  
能解释一下吗？