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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → 这段代码有错吗

   

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

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

主题：这段代码有错吗
帅哥哟，离线，有人找我吗？
jinze
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游侠 帖子：104 积分：447 威望：0 精华：0 注册：2010/4/25 18:39:52 		这段代码有错吗  发帖心情 Post By：2013/10/9 9:57:50 [只看该作者]

if not(wucode) then
 set Report1 = MarketData.GetReportData(Code,Market1)
 if i=0 then
 MaxVolume = Report1.Volume
 end if
 
    If Report1.Volume = MaxVolume Then
     MaxCode = Report1.Label
     'MaxVolume = Report1.Volume
    End if
end if

 

每次升级后都提示“If Report1.Volume = MaxVolume Then”这句424错误。
 回到顶部
帅哥哟，离线，有人找我吗？
jinze
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游侠 帖子：104 积分：447 威望：0 精华：0 注册：2010/4/25 18:39:52 		  发帖心情 Post By：2013/10/9 10:30:52 [只看该作者]

管理员了

 回到顶部
帅哥哟，离线，有人找我吗？
王锋
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：罗宾汉 帖子：11808 积分：20695 威望：0 精华：10 注册：2009/8/18 8:15:13 		  发帖心情 Post By：2013/10/9 12:24:29 [只看该作者]

MarketData.GetReportData(Code,Market1)

你仔细检查一下 Code,Market1 这两个变量的品种是不是系统里面没有，没有的话Report1 对象就是控制，自然就会出现问题。

 

为了防止出现异常，建议你的代码中涉及到对象引用时，要加以对象是否为空的判断

 

set Report1 = MarketData.GetReportData(Code,Market1)

if not(Report1 is nothing) then
  '相应的处理
end if

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

金字塔-技术部

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

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

Email:service@weistock.com
 回到顶部
帅哥哟，离线，有人找我吗？
jinze
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游侠 帖子：104 积分：447 威望：0 精华：0 注册：2010/4/25 18:39:52 		  发帖心情 Post By：2013/10/9 14:30:42 [只看该作者]

if not(wucode) then
这句就是对对象是否为空的判断。

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.12500 秒, 5 次数据查询