主题：GetHistoryData（）问题

Function CS03(Formula,N1)    ’N1为GetHistoryData（）读取周期类型
    CS03=0
     Set grid=Formula.ParentGrid
     Label=grid.StockLabel
     Mkt=grid.Market          '获取调用公式的市场及代码

      Set Historydt = MarketData.GetHistoryData(Label,Mkt,N1)   '读取历史数据，N1为6时读取周线数据
     fpos=formula.indexdata  '读取调用公式时的位置
     str=grid.Datebypos(fpos) '获取调用公式时的日期时间
  hpos = Historydt.GetPosFromDate(str)   '读取该日期的历史数据位置
 
  hc=historydt.close(hpos)   '读取历史数据收盘价
 
  CS03=hc   '或者CS03=hpos，这样可以明显看出历史数据的序数变化。

End Function

pel代码

dd:CS03(6);