以文本方式查看主题 -  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp) --  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5) ----  如何在ReportNotify事件中判断5分钟周期结束和新周期开始  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=76855)

--  作者：priam --  发布时间：2015/3/24 23:33:28 --  如何在ReportNotify事件中判断5分钟周期结束和新周期开始 在图形化交易时，买卖点判断是在每个周期k线结束时候。看指标是否符合模型。 我想现在用vba写交易模型，使用ReportNotify事件接收数据，用什么方法判断周期k线结束？

--  作者：王锋 --  发布时间：2015/3/25 0:03:29 --   调取周期的行情数据，取最后一个K线的时间数据，在没有形成新K线时这个值会一直保持不变

--  作者：priam --  发布时间：2015/3/27 23:49:38 --   能否写一下，是那个对象的，那个属性，或是方法？

--  作者：王锋 --  发布时间：2015/3/28 14:43:57 --   下周给你写个范例

--  作者：sunni520 --  发布时间：2015/3/29 21:29:56 --   Sub MarketData_ReportNotify(ReportData)   dim IF00K   IF ReportData.Label="IF00" then    \'     Set IF00K = marketdata.GetHistoryData("IF00","ZJ",1,10)   \'取最近10根K线       IF Document.GetExtData("IF00LASTKtime")<> IF00K.date(IF00K.count-1) then         CALL Document.SetExtData("IF00LASTKtime",IF00K.date(IF00K.count-1))         \'以下处理形成新K线有关事务         \'         \'       ELSE         \'以下处理没有新K线时事务         \'       END IF   END IF End Sub

--  作者：priam --  发布时间：2015/3/29 22:44:29 --   谢谢 王锋，sunni520