欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → 若无持仓,查询持仓的结果是0,还是空

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有2680人关注过本帖树形打印复制链接

主题:若无持仓,查询持仓的结果是0,还是空

帅哥哟,离线,有人找我吗?
chendong
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:284 积分:0 威望:0 精华:0 注册:2015/10/23 10:17:30
若无持仓,查询持仓的结果是0,还是空  发帖心情 Post By:2016/1/5 19:33:12 [只看该作者]

Sub GetHoldByCode(sAccount,sCode,sMarket)    
 dim i
 dim BuyHolding
 dim BuyCost
 dim BuyTodayHolding
 dim SellHolding
 dim SellCost
 dim SellTodayHolding
 dim PNL
 dim UseMargin 
 dim Code
 dim Market
 
  On Error resume Next
  AccountStatus=Order.Account2(2,sAccount)     '检测账户是否登陆,如果没有登陆就退出
  'application.MsgOut sCode & "," & sMarket & "," & sAccount & ",NextCode:" & NextCode & ",账户状态:" & AccountStatus
    if AccountStatus=255 Or AccountStatus="" then
     exit sub
    end if 
    Call Order.HoldingInfoByCode2(sCode,sMarket,BuyHolding,BuyCost,BuyTodayHolding,SellHolding,SellCost,SellTodayHolding,PNL,UseMargin,sAccount)
 BuyHold=BuyHolding
 SellHold=SellHolding

End Sub


这段代码是用来查账户持仓的,请问,若账户没有持仓,那BuyHold的值是0,还是为空。若为空值,如何转为0

 回到顶部
帅哥哟,离线,有人找我吗?
王锋
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:罗宾汉 帖子:11808 积分:20695 威望:0 精华:10 注册:2009/8/18 8:15:13
  发帖心情 Post By:2016/1/5 21:25:52 [只看该作者]



金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部