以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  [求助]marketdata.GetMarketInfo的输出看不懂  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=95820)

--  作者:dwjgwsm
--  发布时间:2016/4/5 13:01:58
--  [求助]marketdata.GetMarketInfo的输出看不懂
 Set MarketInfo = marketdata.GetMarketInfo("L","DQ")
Application.MsgOut MarketInfo.OPENTIME

输出是1:00:00

Set MarketInfo = marketdata.GetMarketInfo("P","DQ")
Application.MsgOut MarketInfo.OPENTIME

输出还是1:00:00

Set MarketInfo = marketdata.GetMarketInfo("L","DY")
Application.MsgOut MarketInfo.OPENTIME

输出是12:00:00

Set MarketInfo = marketdata.GetMarketInfo("P","DY")
Application.MsgOut MarketInfo.OPENTIME

输出还是12:00:00
--  作者:yukizzc
--  发布时间:2016/4/5 13:06:30
--  

请问是什么问题?DY没有这个市场的


--  作者:dwjgwsm
--  发布时间:2016/4/5 13:26:03
--  
 上面的输出看不懂啊.

Set MarketInfo = marketdata.GetMarketInfo("L","DQ")
Application.MsgOut MarketInfo.OPENTIME

为什么输出是1:00:00?

我是看vba帮助文档中有一个SY,那我猜也应该有个DY ZY罗?反正我的目的就是想取到各品种的开盘时间.

sub TEST()
Set MarketInfo = marketdata.GetMarketInfo("AG","SY") \'取上期夜盘市场市场信息
Application.MsgOut MarketInfo.TimeZoneDiff \'显示上期夜盘市场时间与北京时间差多少分钟
END SUB



--  作者:yukizzc
--  发布时间:2016/4/5 13:33:17
--  

金字塔时间是往后+4小时的,你打开图表看下就明白。

 

TimeZoneConver(timeDate,Type)

指定时间转换该市场时区时间或者北京时间

timeDate    指定要转换的时间

Type        时间转换类型  0 北京时间转金字塔时区时间  1金字塔时区时间转北京时间

返回值:     返回转换后的时间


--  作者:dwjgwsm
--  发布时间:2016/4/5 13:53:30
--  
 这个我知道啊.塑料的opentime和棕榈的opentime怎么都一样呢?还都是1点
应该都在一个时区
[此贴子已经被作者于2016/4/5 13:55:04编辑过]

--  作者:yukizzc
--  发布时间:2016/4/5 14:06:06
--  
目前有点问题,没有细分到品种,返回整个市场的一个开盘时间这边
--  作者:dwjgwsm
--  发布时间:2016/4/5 14:13:53
--  
 vba里面只有这里有取开盘时间的功能,所以希望尽快纠正这个错误.