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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → VBA的testreport 重大失误

   

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


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

主题:VBA的testreport 重大失误

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


加好友 发短信
等级:新手上路 帖子:93 积分:0 威望:0 精华:0 注册:2014/1/29 15:08:45
  发帖心情 Post By:2014/9/30 13:21:35 [只看该作者]

将帮助里GetHistoryDataByDate的代码稍微修改了一下,发现仍旧存在问题。我在图表内用时间尺去量,"2010/1/1"~"2011/8/16"这段时间的K线长度是394(T)。
但是下面的代码 运行结果是267根。 而且起始时间不对。不知问题出在哪里呢?
==========================
267
2010/7/14
2011/8/16
==========================

sub TEST()
set Data1= marketdata.GetHistoryDataByDate("ru00","sq",5,"2010/1/1","2011/8/16") '读中金所股指期货主力合约指定时段的日线数据
for i = 0 to 4     '将msgout与之前的数据隔开,便于观察
application.MsgOut "     "
next  
Application.MsgOut Data1.Count '打印输出数据量
Application.MsgOut Data1.Date(0) '输出第一个数据日期
Application.MsgOut Data1.Date(Data1.Count-1)'输出最后一个数据日期
'数据处理完毕后,清理缓冲区 
marketdata.DestroyHistoryData
End Sub


Sub APPLICATION_VBAStart()
call test
End Sub




 回到顶部
总数 22 1 2 3 下一页