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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → vba的两个问题

   

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


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

主题:vba的两个问题

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


加好友 发短信
等级:论坛游侠 帖子:118 积分:278 威望:0 精华:0 注册:2012/3/21 23:07:07
vba的两个问题  发帖心情 Post By:2013/8/13 14:46:08 [只看该作者]

1.用模拟交易账户能不能调用order对象下单

2.在vba中怎么样在定时器中获取上一根1分钟K线的收盘价,最好有代码例子,谢谢


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


加好友 发短信 czt
等级:蜘蛛侠 帖子:1445 积分:6114 威望:0 精华:3 注册:2012/1/16 10:31:19
  发帖心情 Post By:2013/8/13 15:32:25 [只看该作者]

1 可以

2

   set Report1 = marketdata.GetReportData("600217","SH")

   msgbox Report1.close


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


加好友 发短信
等级:论坛游侠 帖子:118 积分:278 威望:0 精华:0 注册:2012/3/21 23:07:07
  发帖心情 Post By:2013/8/13 16:23:05 [只看该作者]

set Report1 = marketdata.GetReportData("600217","SH")

msgbox Report1.close

是取得当前最新价格,如果在1分钟周期下,怎么样取得倒数第二根和第3根K线的收盘价呢?


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


加好友 发短信 czt
等级:蜘蛛侠 帖子:1445 积分:6114 威望:0 精华:3 注册:2012/1/16 10:31:19
  发帖心情 Post By:2013/8/13 17:00:23 [只看该作者]

最新价是newprice;

1分钟

Set HistroyData = marketdata.GetHistoryData("SRX00","ZQ",5)'若要是分钟这里填0

for i = 0 to HistroyData.count-1

 

 

vba是个循序渐进的过程 不是来几行代码 就能帮到你的。多看看论坛 能有很大收获的哦


 回到顶部