set minutedata = marketdata.GetMinuteData("rb10","sq")
minutedata.getvirprice(0)
vba的吗,在MinuteData这个对象例子里不是有其他例子吗
再求教:经测试,取到的值均为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
.....