Rss & SiteMap
金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/
Sub test() Dim tm dim a (10) a(0) = 1 a(1) = 2 call dx(a)End Sub
Sub dx(tm) for i = 0 to 3 application.MsgOut tm(i) nextend sub