以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  高级功能研发区  (http://www.weistock.com/bbs/list.asp?boardid=5)
----  VBS怎么获取指定品种的最小跳点值?  (http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=34904)
--  作者：Marcus
--  发布时间：2012/12/28 3:16:33
--  VBS怎么获取指定品种的最小跳点值?
 比如"ZJ"下的IF00品种，
我可以根据reportdata对象获取买卖差价以及涨停跌停价，但没法获取最小跳点值（点差）是多少，这对我使用定价单开仓造成了麻烦。

            Set report=MarketData.GetReportData("IF00", "ZJ")
            ASK=report.BuyPrice1
            If ASK>report.UpperLimitPrice then
                ASK=report.UpperLimitPrice
            End if
            BID=report.SellPrice1
            If BID<report.LowerLimitPrice then
                BID=report.LowerLimitPrice
            End if

求高手指点。

[此贴子已经被作者于2012-12-28 3:16:47编辑过]
--  作者：guotx2010
--  发布时间：2012/12/28 8:33:24
--  

使用Order对象的Contract方法，下面的示例代码

 

private iMinTick,iMultipliter    \'最小跳点,合约乘数(需要定义为模块级变量)

Sub GetContractInfo(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
End Sub

 

如：要获取股指的最小跳点和合约乘数，GetContractInfo "IF01","ZJ"

 

 
--  作者：Marcus
--  发布时间：2012/12/28 16:43:32
--  
 谢谢楼上！
问题已经解决。