欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → 关于vba取1分钟K线信息的问题

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有3520人关注过本帖树形打印复制链接

主题:关于vba取1分钟K线信息的问题

帅哥哟,离线,有人找我吗?
liboys
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:18 积分:0 威望:0 精华:0 注册:2017/6/22 14:01:57
关于vba取1分钟K线信息的问题  发帖心情 Post By:2017/11/13 12:23:42 [显示全部帖子]

在VBA中,我需要在定时器中,每隔一分钟,取所有品种的上一分钟的收盘价实时信息,用了下面的代码

'周期类型
'0 1分钟 1 5分钟 2 15分钟 3 30分钟 4 60分钟 5日线 6周线 7月线 8年线 9多日线 10分笔成交
'11多小时线 12多秒线 13多分钟线 14季度线 15半年线 16节气线 17 3分钟 18 10分钟 19 多笔线

set f_tmp = marketdata.GetHistoryData( "CU01", "SQ", 0 )    
f_idx = f_tmp.Count - 1
f_date = f_tmp.Date(f_idx)
f_close = f_tmp.Close(f_idx)  


用定时器每分钟执行一次,发现在晚上11点30分以后,什么时候取,返回的时间和收盘价都是当天23:30:00的数据,请问原因?

(此外,还有什么方法可以在VBA中实时取当前时间的上一分钟收盘价信息?)

 回到顶部
帅哥哟,离线,有人找我吗?
liboys
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:18 积分:0 威望:0 精华:0 注册:2017/6/22 14:01:57
  发帖心情 Post By:2017/11/14 9:09:57 [显示全部帖子]

又试了一晚上,到晚上 2017-11-13 23:30:00  分以后就取不到信息了,K线图正常的

 回到顶部