欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → 帮助中Table 对象GetReportData方法怎么用?

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有5610人关注过本帖树形打印复制链接

主题:帮助中Table 对象GetReportData方法怎么用?

帅哥哟,离线,有人找我吗?
无为剑
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:2437 积分:0 威望:0 精华:0 注册:2016/3/5 22:53:41
  发帖心情 Post By:2018/5/17 18:29:42 [显示全部帖子]

1,Report_RefurbishFinished 事件是报表刷新时自动触发的,你通过在该事件中调用SwitchBlock会导致死循环,导致这个事件不断被重复触发
2,只有你自己创建的对象才需要销毁,从系统中获取的对象不要销毁,会导致内存使用异常。
 
下面代码改写后可以正常工作
 
 
Sub Report_RefurbishFinished222(Table)
    application.ActivateFrame("Report")
    Set Table = Report.GetGridByName("上海指数").GetTable()
        call table.SwitchBlock( "连续合约板块",1   )
        for i=0 to table.rowcount()-1
        Set StockData=Table.getReportData(i)
        application.MsgOut StockData.marketName
        'set StockData=nothing
        next
    'set Table=nothing
End Sub
 
 
Sub APPLICATION_VBAStart()
    application.ClearMsg    '控制台清屏
    call Report_RefurbishFinished222(Table) '读列表
End Sub


 回到顶部