咨詢內容：Sub Test() dim longPosition,shortPosition,allPositionOrder.HoldingCalc=1longPosition=order.GetTholding("IF03","ZJ","",0)shortPosition=order.GetTholding("IF03","ZJ","",1)allPosition=order.GetTholding("IF03","ZJ","",-1)application.MsgOut longPositionapplication.MsgOut shortPositionapplication.MsgOut allPositionEnd Sub 結果:000 但實際有一手空單,在帳戶欄上也有顯示
打印本文
關閉窗口