主题：GetHistoryData如何取得自定义函数所在序列的数据？

使用自定义函数的时候，用弄到了GetHistoryData来读去历史数据，但是发现GetHistoryData取得的历史数据是硬盘全部或部分数据，而不是自定义函数所在序列的历史数据，这就造成算出来的结果就像全局变量一样，只有一个数值，该如何让历史的数据用历史计算？


比如做一个指标，应用自定义函数，函数代码为

Dim l '创建一个变量
'创建Array外部对象，将对象实例置变量d中
Set l = CreateObject("Stock.Array")
'创建完Array对象后往其内部插入两个数据
ClosePrice = History.Close(History.Count-1)

自定义函数返回ClosePrice 这个数值

那么指标体现在图表上就像全局变量一样一条直线

调用公式系统的数据，这样就能对应上了！

 

Set MyGrid = Formula.ParentGrid

Set History = MyGrid.GetHistoryData()

 

根据 Formula对象的IndexData属性，调用History对象的数据就行了