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


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

   

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


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

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

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


加好友 发短信
等级:新手上路 帖子:16 积分:0 威望:0 精华:0 注册:2017/5/19 0:19:23
再问从Table中得到Reportdata的方法  发帖心情 Post By:2018/5/16 23:46:07 [显示全部帖子]

     Set Table = Report.GetGridByName("上海指数").GetTable()

        for i=0 to table.rowcount()

        Set StockData=table.getReportData(i)
        application.MsgOut StockData.marketName    '报错缺少对象StockData,请问为什么?
        set StockData=nothing

    set Table=nothing

本意是想从动态显示牌的列表中读出取出每一行合约,和这个合约对应的市场名称,比如RB00对应的SQ

 回到顶部
帅哥哟,离线,有人找我吗?
spacedude
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:16 积分:0 威望:0 精华:0 注册:2017/5/19 0:19:23
再问从Table中得到Reportdata的方法(停不下来)  发帖心情 Post By:2018/5/17 15:23:46 [显示全部帖子]

 代码修正后不再报错,但是调用后停不下来
代码放在Function 模块中,在Macro模块中调用。
开始放在Application.VbaStart()下调用也出现过这个问题(运行后不会停下来,直到死机。)
Funaction模块中代码:
Sub Report_RefurbishFinished(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


Macro模块下代码:
Sub APPLICATION_VBAStart()
    application.ClearMsg    '控制台清屏
    call Report_RefurbishFinished(Table) '读列表
End Sub


 回到顶部
帅哥哟,离线,有人找我吗?
spacedude
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:16 积分:0 威望:0 精华:0 注册:2017/5/19 0:19:23
  发帖心情 Post By:2018/5/17 15:39:38 [显示全部帖子]

  修改后不再报错,但VBA不会停下来,一直执行到金字塔崩溃。
之前把代码放在Application.VbaStart()下调用也有这个情况 ,
后来不放在vbaStart()之下 调用,而是直接把调用指令写在Macro模块下,这种情况不会一直执行
现在上述两种方式都一直执行,不会停止。
版本:V4.61 (X64)

 回到顶部