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


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

   

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

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

主题：关于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中实时取当前时间的上一分钟收盘价信息？）
 回到顶部
帅哥哟，离线，有人找我吗？
yukizzc
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：21598 积分：0 威望：0 精华：1 注册：2010/7/31 16:35:30 		  发帖心情 Post By：2017/11/13 13:24:12 [只看该作者]

平时都正常，就晚上11点30后出现的问题吗。你看下k图上，cu01这个时间点后数据是否正常呢
 回到顶部
帅哥哟，离线，有人找我吗？
liboys
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | 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线图正常的

 回到顶部
帅哥哟，离线，有人找我吗？
yukizzc
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：21598 积分：0 威望：0 精华：1 注册：2010/7/31 16:35:30 		  发帖心情 Post By：2017/11/14 9:30:45 [只看该作者]

这边晚上测试下

 回到顶部
帅哥哟，离线，有人找我吗？
yukizzc
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：21598 积分：0 威望：0 精华：1 注册：2010/7/31 16:35:30 		  发帖心情 Post By：2017/11/15 8:47:02 [只看该作者]

本地这边测试的情况，请问您这边的软件版本是多少？是4.4的吗

 


图片点击可在新窗口打开查看此主题相关图片如下：nup_n`7@nptb`q8l4fdfl_a.png
图片点击可在新窗口打开查看
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 00.04297 秒, 5 次数据查询