'取得market值
sub main()
Set Grid = Technic.GetGridByName("Main")
Set Market = grid.GetMarketinfo()
MsgBox market.Name
end sub
Function MyTest(Formula)
'系统会在逐K线模式解释公式时的每个周期都会调用此函数一遍,因此设计时应该注重程序的执行效率,不要重复的执行一些没必要的代码
Set Grid = Formula.ParentGrid
Application.MsgOut Grid.StockLabel &"---"&Grid.Market
End Function