
等级: 新手上路
- 注册:
- 2022-3-8
- 曾用名:
|
请教老师:我想用VBA的MarketStat 高频扩展统计,统计有效交易家数、深市上涨家数,下跌家数问题1:DataSH = marketstat.LoadStatExData("sh",#2023/03/21#),得到的数值是197,这是什么意思?
问题2:DataSH4=marketstat.NOLOT(0,"SZ") 得到DataSH4数值是2937,是否对?
问题3:DataSH5=marketstat.TOTDECLINE(0,"SZ") DataSH6=marketstat.TOTADVANCE(0,"SZ") 得到下跌深市下跌家数是1127,上涨家数是1351,好像与实际不符
贴上源码:
Sub testxmlattribute()
DIM DataSH,DataSZ,DataSH2,DataSH3,DataSH4,DataSH5,DataSH6,DataSH7
DataSH = marketstat.LoadStatExData("sh",#2023/03/21#)
application.MsgOut "已经调取沪市"&DataSH&"个品种"
DataSH2=marketstat.GetStatExDataCount("SH")
application.MsgOut "已经调取SH2"&DataSH2&"个品种"
DataSH3=marketstat.NOLOT(0,"SH")
application.MsgOut "沪市有效交易家数"&DataSH3&"个品种"
DataSH4=marketstat.NOLOT(0,"SZ")
application.MsgOut "深市有效交易家数"&DataSH4&"个品种"
DataSH5=marketstat.TOTDECLINE(0,"SZ")
application.MsgOut "深市下跌家数"&DataSH5&"个品种"
DataSH6=marketstat.TOTADVANCE(0,"SZ")
application.MsgOut "深市上涨家数"&DataSH6&"个品种"
DataSH7=DataSH5+DataSH6
application.MsgOut "深市上涨和下跌家数之和"&DataSH7&"个品种"
End Sub
|
|