在一分钟周期上，当前周期结束时如何获取当前周期的最高价、最低价、开盘价、收盘价、成交量、时间、日期 - 高级功能研发区 - 金字塔客服中心 - 专业程序化交易软件提供商

后台交易程序里，在一分钟周期上，当前周期结束时如何获取当前周期的最高价、最低价、开盘价、收盘价、成交量、时间、日期。

我用这些函数，但返回的是一个数组，我应该取数组的那个值呢？

myClose := CLOSE;

myOpen := OPEN;

myHigh := HIGH;

myLow := LOW;

myVol := VOL;

myTime := TIME;

myDate := DATE;

我的全部代码如下：

DEBUGOUT('开始执行=%.0f',OPEN);

myClose := CLOSE;

myOpen := OPEN;

myHigh := HIGH;

myLow := LOW;

myVol := VOL;

myTime := TIME;

myDate := DATE;

//if timetot0(dynainfo(207))=time0-1 then begin

//extgbdataset('myClose', CLOSE);

//extgbdataset('myOpen', open);

//extgbdataset('myHigh', high);

//extgbdataset('myLow', low);

//extgbdataset('myVol', vol);

//extgbdataset('myTime', time);

//extgbdataset('myDate', date+19000000);

//end

myCloses =ffl.vardata("myClose")

myClose = myCloses(0)

myOpens =ffl.vardata("myOpen")

myOpen = myOpens(0)

myHighs =ffl.vardata("myHigh")

myHigh = myHighs(0)

myLows =ffl.vardata("myLow")

myLow = myLows(0)

myVols =ffl.vardata("myVol")

myVol = myVols(0)

myTimes =ffl.vardata("myTime")

myTime = myTimes(0)

myDates =ffl.vardata("myDate")

myDate = myDates(0)

Dim conn

Dim Rst

Dim strCnn

Const strC

Set conn = CreateObject("adodb.connection")

conn.Open strConn

'查看是否连接成功，成功状态值为1

'msgbox Conn.state

'If Conn.State = 0 Then

' msgbox "连接数据库失败"

'else

' msgbox "连接数据库成功"

'End If

Set Rst =CreateObject("ADODB.Recordset")

Rst.open "insert into spr_candle_line(high,low,opens,closes,vol,times,dates) values("&myHigh&","&myLow&","&myOpen&","&myClose&","&myVol&","&myTime&","&myDate&")",conn

'Rst.open "insert into spring_test(test_no) values("&myClose&")",conn

'msgbox "数据库插入成功"

'Rst.open "select test_no from spring_test",conn

'While not Rst.eof '

' test_no = Rst("test_no").value

' msgbox test_no

' Rst.movenext

'wend

'Rst.open "update spring_test set test_no = 9999999",conn

'Rst.close '关闭记录集

Set Rst=nothing '释放对象

conn.close '关闭连接

Set cnn=nothing '释放对象

DEBUGOUT('执行结束=%.0f',CLOSE)

主题：在一分钟周期上，当前周期结束时如何获取当前周期的最高价、最低价、开盘价、收盘价、成交量、时间、日期