主题：MarketData.STKINDI 60分钟

我换一个问法:

我想用VBA获取IF07的1分钟的MA指标的实时数据,方法如下:

'---------------------------------------------
Sub Test() 

    dim cycle
    cycle=0     

    dim formula
    set formula=MarketData.STKINDI("IF07","ZJ","MA",0,cycle)
    Application.MsgOut "DataSize=" & formula.DataSize
    Application.MsgOut "MA1=" & formula.GetBufData("MA1",formula.DataSize-1)

    set formula=Nothing

End Sub

'---------------------------------------------

对比输出和图表显示(DataSize的输出和图表上最后一根K线的正序比较),
当周期为30分钟和60分钟时,数据明显不正确,
而周期为1分钟,5分钟,15分钟,日线,周线时,数据则是正确的

好吧,用下面的方法发现,30分钟,60分钟,VBA的数据与图表数据是不一样的,但其它周期都一样

Sub Test() 

    dim hd,count,i,cycle
   
    cycle=4
   
    set hd=MarketData.GetHistoryData("IF07","ZJ",cycle)
    count=hd.Count-1
 
    for i=count to count-4 step -1
        Application.MsgOut "收盘价=" & hd.Close(i)
    next
    set hd=Nothing

End Sub