标题：麻烦版主测试下这段代码貌似有BUG

1楼

zyyh 发表于：2016/5/17 17:10:44

Sub test3()

bantu="dq"

pinzh

Dim changdu_ri,changdu_shi,changdu_zhou

Set shi= marketdata.GetHistoryData(pinzhong,bantu,4)'取M09连续的时线数据

changdu_shi =shi.Count

Set ri= marketdata.GetHistoryData(pinzhong,bantu,5)'取M09连续的日线数据

changdu_ri =ri.Count

Set zhou= marketdata.GetHistoryData(pinzhong,bantu,6)'取M09连续的周线数据

changdu_zhou =zhou.Count

MSGBOX changdu_shi & " " & changdu_ri & " " & changdu_zhou & chr(13) & shi.Count &" " & ri.Count &" " & zhou.Count

Exit sub

end sub

取豆粕的数据测试出来的结果是 1000 764 160 160 160 160

是不是如果不是会员加载到了1000条数据K 就会导致后面的出错啊

[此贴子已经被作者于2016-5-17 17:12:33编辑过]

2楼

zyyh 发表于：2016/5/17 17:13:46

上面的品种是 M09 被和谐了

[此贴子已经被作者于2016-5-17 17:14:00编辑过]

3楼

王锋发表于：2016/5/17 17:31:29

HistoryDataMode 历史数据处理处理模式 0默认值,GetHistoryData，GetHistoryDataByDate 方法取到的对象为共享模式;1为独立模式,打开不同品种可以分别处理各自的数据,数据处理完毕后要调用DestroyHistoryData方法销毁内存缓冲区.

4楼

zyyh 发表于：2016/5/17 20:01:13

谢啦老大我清楚啦

5楼

zyyh 发表于：2016/5/18 7:55:29

实际设置

HistoryDataMode =1

测试结果依然是如果是同一品种，不同周期间数据依然错误，无语，算了，大不了每次初始化下。

看说明这个起作用的是不同品种才有效

共5 条记录, 每页显示 10 条, 页签: [1]

标题：麻烦版主测试下 这段代码 貌似有BUG