主题：关于 array 的用法问题

 运行的时候总会 在 next i 的地方出现
编译器错我1025
expected end of statement。

请问是什么原因？ 都是跟随  VBA 的语法，看不出问题。

function test( ticker, market, cycle, period )
    
    dim a
    dim d
    set d = createobject("Stock.Array")
    dim i
    dim x
    
    set History = marketdata.GetHistoryData( ticker, market,cycle )
    
    for i = 0 to period - 1 step 1
        x = History.close( History.count - i )    
        d.addback( x )
    next i
    

end function