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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件金字塔软件问题提交 → 为什么前后导出的TICK数据不一样

   

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


  共有2796人关注过本帖平板打印复制链接

主题:为什么前后导出的TICK数据不一样

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


加好友 发短信
等级:小飞侠 帖子:1781 积分:0 威望:0 精华:0 注册:2013/6/11 20:05:24
  发帖心情 Post By:2016/6/30 8:43:29 [只看该作者]

set minutedata = marketdata.GetMinuteData("rb00","sq")
 oWb.Sheets("Sheet1").Range("a1").Value = "时间"
 oWb.Sheets("Sheet1").Range("B1").Value = "最新价"
    oWb.Sheets("Sheet1").Cells(1,3) = "成交量"
    oWb.Sheets("Sheet1").Cells(1,4) = "持仓量"
    oWb.Sheets("Sheet1").Cells(1,5) = "委卖价"
    oWb.Sheets("Sheet1").Cells(1,6) = "委买价"
    oWb.Sheets("Sheet1").Cells(1,7) = "成交方向"
   
    For ii = 0 To minutedata.count-1
      oWb.Sheets("Sheet1").Cells(ii+2,1) = minutedata.Date(ii)
   oWb.Sheets("Sheet1").Cells(ii+2,2) = minutedata.NewPrice(ii)
      oWb.Sheets("Sheet1").Cells(ii+2,3) =  minutedata.Volume(ii)
      oWb.Sheets("Sheet1").Cells(ii+2,4) = minutedata.OpenInt(ii)         
   oWb.Sheets("Sheet1").Cells(ii+2,5) = minutedata.ASKPRICE(ii)
      oWb.Sheets("Sheet1").Cells(ii+2,6) =  minutedata.BIDPRICE(ii)
      oWb.Sheets("Sheet1").Cells(ii+2,7) =  minutedata.IsBuy(ii)

 回到顶部