以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  [求助]撤单追价的VBA过程应该怎么写?  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=97135)

--  作者:kevinbauer
--  发布时间:2016/5/6 13:13:39
--  [求助]撤单追价的VBA过程应该怎么写?
比如我下单,五秒后如果无成交就撤单,然后重新下单
--  作者:yukizzc
--  发布时间:2016/5/6 14:03:05
--  

看下order对象,未成单时间等等这些信息都可以取到的

至于撤单和下单动作该对象下都有

有关帮助信息可以打开帮助-vba编程信息


--  作者:kevinbauer
--  发布时间:2016/5/6 14:55:23
--  
说明书没看太明白,以ORDER ID为例:

BuyShort(Type,Vol,Price,StoplmtPrice,Code,Market,AccountID,Valid)

Type            委托类型,分别可为 0限价 1市价 2停损 3限价停损

Vol               委托数量

Price           委托价格,当Type为2和3时为停损价格

StoplmtPrice    停损限价,当Type为3时必须指定停损限价

Code            品种代码,如 "600215"

Market          品种市场,如"SH"表示上海市场

AccountID       指定帐户,为空表示当前帐户

Valid           为1表示下单时弹出确认对话框,为0表示直接下单到服务器

返回值:         下下单失败返回-1,否则返回本地订单ID(可能包含负数),通过此ID可以修改订单或者撤单等等操作


这个方法是通过 CALL order.buyshort(...)来调用的,如何能获取返回值?


--  作者:yukizzc
--  发布时间:2016/5/6 15:06:44
--  

a = order.buyshort()

application.msgout a

这个a就是返回值了


--  作者:kevinbauer
--  发布时间:2016/5/6 21:54:59
--  
DIM SKID
SKID = order.BuyShort(1,Vol,bPrice1,0,sCode1,sMarket,"",0)

我是这样写,对么?但下不了单,返回值为-1

--  作者:马良
--  发布时间:2016/5/6 22:19:37
--  
反悔-1是参数有误导致的,检查你输入的参数