使用order对象的Contract方法来获取。
private iMultipliter,iMinTick,iShortPercent,iLongPercent
Sub GetContractHold(sCode,sMarket) '获取合约的信息
'Application.MsgOut sCode & "," & sMarket
on error resume next
Call Order.Contract(sCode,sMarket,Multipliter,MinTick,ShortPercent,LongPercent)
iMultipliter=Multipliter
'application.MsgOut iMultipliter
iMinTick=MinTick
iShortPercent=ShortPercent
iLongPercent=LongPercent
End Sub
有了保证金比例，你自己就能计算某品种的保证金额了，现价*合约乘数*保证金率。