Skip to main content

开始使用

接口范例

20241218 VBA sample和api.zip

导入接口

打开Excel->开发工具->Visual Basic Visual Basic->工具->引用->TCTradeWrapperAPILib 勾选,然后点确定 Visual Basic->工具->工程->导入文!件 TradeAPI.cls

定义使用TradeAPI类型事件对象trade

Option Explicit
Public WithEvents trade As TradeAPI

实例化类型事件对象trade

Set trade = New TradeAPI

建立连线

trade.Connect,参数为客户端的SystemName连线成功,回调事件OnConnect触发

Private Sub trade_OnConnect()
    Debug.Print ("连线成功")
End Sub

Public Sub Connect() trade.Connect("AlgoMaster2") End Sub


断开连线

连线成功,回调事件OnDisConnect触发

Private Sub trade_OnDisConnect()
    Debug.Print ("连线断开")
End Sub
Public Sub DisConnect()
    trade.DisConnect
End Sub

请求查询已登入账号列表

账号列表通过事件OnAccountList(ByVal i As Integer, ByVal accountlistitem As ADIAccount)返回

Private Sub trade_OnAccountList(ByVal i As Integer, ByVal accountlistitem As ADIAccount)
    Debug.Print ("账号列表响应:" + accountlistitem.Account)
End Sub
'请求查询已登入账号列表
Public Sub accoutlist()
    Call trade.ReqAccountList
End Sub

回调方法accountlistitem对象字段说明

字段 类型 注释 结果
Account string 账户 9999-044491
AccountName string 账户名 MC_lee
AccountType string 账户类型,F:期货,O:期权,S:证券 FO
BrokerID string 账户类编码 CTP_SIMNOWSE662
BrokerName string 账户类名 CTP模拟 simnow电信(穿透式api662)
ItemType int   1
LoginID string 登入账户 044491
OrderExchange string 可下单的交易所 CME:CBOT:DCE:CFFEX:SHFE:CZCE:INE:GFEX
Status int 账户登入状态(0:尚未登入 1:登入中 2:登入完成) 2
UserAddGroup int   0
UserName string 用户名 MC_lee
Level int ETF期权账户使用者级别 3
AccountReleated string 证券/期货账户连接ID