标题：求教:VBA发送止损单的方法/指令

我是用VBA窗口编写的程序
用Order 对象,找不到止损的方法
怎么把止损单送到IB服务器上呢?请指教,谢谢

参考这个套利下单的例子

http://www.weistock.com/bbs/dispbbs.asp?boardid=5&Id=2120

 

Buy 方法

开多操作

Buy(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表示直接下单到服务器

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

 

下单函数的第一个参数就是委托单类型，如果你要发送止损单，填2即可。

 

金字塔的VBA的对象参考在 帮助菜单－》编程信息

'多单停损单

Call Order.Sell(2,Filled,DtsPrice,0,Code,Market,"",0)

'空单停损单

Call Order.SellShort(2,Filled,KtsPrice,0,Code,Market,"",0)

 

'说明

'Filled是成交的手数

'DtsPrice是多单停损价格，KtsPrice是空单停损价格

'Code是品种代码 Market是市场代码

'注意：中金所不支持停损单，但金字塔可以监控这个价格，当价格到达时，自动向中金所发送限价止损单。大连所支持停损单，但是有停损单时平仓指令将失效。