51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 1496|回复: 7
打印 上一主题 下一主题

[原创] 这个句子怎么msgbox行数出来

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2013-1-7 10:53:28 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
on error resume next
set table=browser("micclass:=browser").page("micclass:=page").webtable("innertext:=XXX.*")
i=table.rowcount
for a=1 to i
     for b=1 to table.columncount(a)
     status=table.childltem(a,b,"webedlt",0").exlst
     if err.number=0 then
        if trim(status.getroproperty("value"))=trim("XXXX") then
            getrows=a
             msgbox getrows
        end if
     end if
   err.clear
     next
next
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

  • TA的每日心情
    无聊
    2018-9-27 10:05
  • 签到天数: 36 天

    连续签到: 1 天

    [LV.5]测试团长

    2#
    发表于 2013-1-7 10:58:58 | 只看该作者
    没看明白,你这不是打印了嘛
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    3#
     楼主| 发表于 2013-1-7 11:01:03 | 只看该作者
    打不出来 getrows这个值
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    无聊
    2018-9-27 10:05
  • 签到天数: 36 天

    连续签到: 1 天

    [LV.5]测试团长

    4#
    发表于 2013-1-7 11:08:07 | 只看该作者
    回复 3# jkm168


        你吧on error去掉,看报什么错吧。

    1. set table=browser("micclass:=browser").page("micclass:=page").webtable("innertext:=XXX.*")
    2. i=table.rowcount
    3. for a=1 to i
    4.      for b=1 to table.columncount(a)
    5.      status=table.childltem(a,b,"webedlt",0").exlst

    6.         if trim(status.getroproperty("value"))=trim("XXXX") then
    7.             getrows=a
    8.              msgbox getrows
    9.      end if
    10.      next
    11. next
    复制代码
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    无聊
    2018-9-27 10:05
  • 签到天数: 36 天

    连续签到: 1 天

    [LV.5]测试团长

    5#
    发表于 2013-1-7 11:10:13 | 只看该作者
    回复 3# jkm168


        你这里面用了好多的判断条件,导致msgbox打印不出来有很多可能,调试的时候,尽量少用那么多判断吧,要么你Debug一行行走,看下是哪个条件影响了msgbox打印。定位一下问题先。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    6#
     楼主| 发表于 2013-1-7 11:40:45 | 只看该作者
    效果没出来,就看到一堆错误
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    无聊
    2018-9-27 10:05
  • 签到天数: 36 天

    连续签到: 1 天

    [LV.5]测试团长

    7#
    发表于 2013-1-7 11:49:11 | 只看该作者
    先看是什么错误
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    8#
     楼主| 发表于 2013-1-7 12:01:23 | 只看该作者
    dim getrows
    on error resume next
    set table=browser("micclass:=browser").page("micclass:=page").webtable("innertext:=XXX.*")
    i=table.rowcount
    for a=1 to i
         for b=1 to table.columncount(a)
         status=table.childltem(a,b,"webedlt",0").exlst
         if err.number=0 then
            if trim(status.getroproperty("value"))=trim("XXXX") then
                getrows=a
                 msgbox getrows
            end if
         end if
       err.clear
         next
    next
    这样就可以出来了
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /2 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-6-17 21:33 , Processed in 0.069972 second(s), 25 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表