以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  MarketData.GetHistoryData数据不正确  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=67614)
--  作者：szp
--  发布时间：2014/7/21 9:42:12
--  MarketData.GetHistoryData数据不正确

 Sub Test2() 
   
    \'1.打开金字塔,依次打开"菜单-->工具-->选项-->常规",把"多分钟线数"设置为5,确定
    \'2.重新打开金字塔软件
    \'3.连续运行本程序两次,观察两次输出的时间的间隔,呵呵
    
    dim hd,cycle,cycleMore,needDataCount
    dim count,i

    cycle=13 \'多分钟线
    cycleMore=6 \'定义多分钟线:6分钟
    needDataCount=10\'获取10个数据
   
    set hd=MarketData.GetHistoryData("IF08","ZJ",cycle,needDataCount,cycleMore)
    count=hd.Count-1

    for i=count to 0 step -1
        Application.MsgOut "时间=" & hd.Date(i) & ",收盘价=" & hd.Close(i)
    next

    set hd=Nothing
   
    Application.MsgOut "----------------------------"
   
End Sub

[此贴子已经被作者于2014/7/21 9:42:27编辑过]
--  作者：王锋
--  发布时间：2014/7/21 9:57:40
--  
别呵呵了,你的数据应该使用范围是 0 - Count-1, 你看看你是怎么用的
--  作者：szp
--  发布时间：2014/7/21 10:05:58
--  

count=hd.Count-1

 

我是倒序用

 

你确定跑过代码?
--  作者：szp
--  发布时间：2014/7/21 10:06:54
--  
第一次获取的数据是 选项 指定的长度,参数不生效,没看见?
[此贴子已经被作者于2014/7/21 10:07:38编辑过]
--  作者：szp
--  发布时间：2014/7/21 10:14:29
--  
 王锋:

你确定跑过代码?
--  作者：王锋
--  发布时间：2014/7/21 10:45:32
--  
运行过,不过我没看到任何问题
--  作者：szp
--  发布时间：2014/7/21 10:45:41
--  
 要去 VIP 论坛提出才有人理?
--  作者：szp
--  发布时间：2014/7/21 10:49:45
--  

收回你在 2 楼的 言论吧,还有 这个帖子的回复

 

http://www.weistock.com/bbs/dispbbs.asp?boardid=5&Id=67347

 

你自己认真看看

 
--  作者：szp
--  发布时间：2014/7/21 10:51:19
--  

 

http://www.weistock.com/bbs/dispbbs.asp?boardid=2&id=53763&authorid=0&page=0&star=2

 

第 18 楼

 
--  作者：王锋
--  发布时间：2014/7/21 13:20:37
--  
问题已经修正