以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  集合竞价GetVirPRICE用法举例  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=184092)

--  作者:spacedude
--  发布时间:2021/1/27 7:52:02
--  集合竞价GetVirPRICE用法举例
帮助文件中对集合竞价的说明看不懂:
GetVirPRICE
 读取基于0指定需要的集合竞价时的委托价

 请版主给出一个例子。比如RB05,20:59时的集合竞价如何获取?
 

--  作者:yukizzc
--  发布时间:2021/1/27 9:03:53
--  

set minutedata = marketdata.GetMinuteData("rb10","sq")
minutedata.getvirprice(0)

 

vba的吗,在MinuteData这个对象例子里不是有其他例子吗


--  作者:spacedude
--  发布时间:2021/1/27 10:28:14
--  回复:(yukizzc)set minutedata = marketdata.GetMi...
多谢!
主要卡在序号这个参数了。
--  作者:spacedude
--  发布时间:2021/1/28 9:11:33
--  
再求教:
经测试,取到的值均为0,请问哪里不对?
Set ReportData =  marketdata.getreportdata(code, market)
VirPRICE = marketdata.GetMinuteData(code, market).GetVirPRICE(0)
count = marketdata.GetMinuteData(code, market).Count
Application.MsgOut stockname &  " 集合竞价: " & VirPRICE & vbtab & marketdata.getreportdata(code, market).newprice
输出结果:
(20:59和8:59运行取到的都是0)
....
早籼稻2111 集合竞价: 0 2705
菜粕2105 集合竞价: 0 2844
纯碱2105 集合竞价: 0 1573
硅铁2105 集合竞价: 0 6948
锰硅2105 集合竞价: 0 6942
白糖2105 集合竞价: 0 5228
PTA2105 集合竞价: 0 3906
尿素2105 集合竞价: 0 1993
动力煤2105 集合竞价: 0 652.4
.....