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


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

   

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


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

主题:Order.Buy问题

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


加好友 发短信
等级:新手上路 帖子:31 积分:213 威望:0 精华:0 注册:2012/12/2 15:00:02
Order.Buy问题  发帖心情 Post By:2013/3/2 22:16:30 [只看该作者]

 Order.Buy(1,10,        价格? ,      停损价格?,     "rb10",    "sq","",0)  最前在一个参数是1,是市价成交

 

后面这两个价格我怎么写啊,怎么写成

 Order.Buy(1,10,       1 ,      1,     "rb10",    "sq","",0) 也以成交呢


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


加好友 发短信
等级:管理员 帖子:7302 积分:32559 威望:1000 精华:45 注册:2003/12/30 16:34:32
  发帖心情 Post By:2013/3/3 0:54:56 [只看该作者]

第一个参数为1表示的是市价单,后面的价格金字塔将会忽略掉,所以你随便填都不会影响


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


加好友 发短信
等级:新手上路 帖子:31 积分:213 威望:0 精华:0 注册:2012/12/2 15:00:02
  发帖心情 Post By:2013/3/3 10:12:17 [只看该作者]

那要是限价呢,后面的价格要填吧,不能忽略吧


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


加好友 发短信
等级:管理员 帖子:7302 积分:32559 威望:1000 精华:45 注册:2003/12/30 16:34:32
  发帖心情 Post By:2013/3/3 10:44:53 [只看该作者]

限价不能忽略,必须填写

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


加好友 发短信
等级:新手上路 帖子:28 积分:185 威望:0 精华:0 注册:2013/3/31 16:03:06
  发帖心情 Post By:2013/4/23 16:27:36 [只看该作者]

那请问下VBA中如何通过获得当期收盘价来计算当order为限价或者限价停损时候的限价呢?


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


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

没看明白


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


加好友 发短信
等级:新手上路 帖子:28 积分:185 威望:0 精华:0 注册:2013/3/31 16:03:06
  发帖心情 Post By:2013/4/23 17:04:35 [只看该作者]

就是如果我想在VBA里面用如下语句

 r=order.Buy(0,vol,price,0,code,market,"",0)

这里是限价指令,限价指令必须要指定限价价格,这里的price我想用当期收盘价,price该如何赋值?


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


加好友 发短信
等级:罗宾汉 帖子:11808 积分:20695 威望:0 精华:10 注册:2009/8/18 8:15:13
  发帖心情 Post By:2013/4/23 20:36:30 [只看该作者]

参考

 

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

这样得到当前的最新价



金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
easonyoyo
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:28 积分:185 威望:0 精华:0 注册:2013/3/31 16:03:06
  发帖心情 Post By:2013/4/24 13:22:00 [只看该作者]

OK .解决了。thanks

 回到顶部