求VB 判断弹出窗口后程序继续的问题？

Question

求VB 判断弹出窗口后程序继续的问题？我有１个ＶＢ程序大致这样：ＬＩＳＴＢＯＸ中导入了相关的项，在WebBrowser1中打开了相关的网页，用ＬＩＳＴＢＯＸ中的项登陆网页后点击了相关按钮会有几种情况的弹出窗口：１．．错误了　２．．失败了　３．．成功了　４．．已完成　现在程序我想当出现第４个弹出窗口时程序的ＬＩＳＴＢＯＸ中的项自动+1，即跳到下一项，这里我如何判断弹出窗口是第４种情况然后触发下一项的条件呢？
WebBrowser1的弹出窗口我已用别的外挂自动点击确定了．请帮忙一下．谢谢～～

Answer 1

在msgbox "成功了"后加上List1.ListIndex = List1.ListIndex + 1
然后再以list1的当前值作为参数调用登陆网页的过程
当然还要判断list1.listindex是不是最后一条。一般情况下如果是最后一条的话就到第一条继续循环

Answer 2

晕。。你在MSGBOX "成功了"的语句后面加上    If List1.ListIndex = List1.ListCount - 1 Then   '判断是否为LIST1最后一项
        List1.ListIndex = 0                         '跳到LIST1第一项
    Else
        List1.ListIndex = List1.ListIndex + 1       '跳到下一项
    End If然后再重复你所说“用ＬＩＳＴＢＯＸ中的项登陆网页后点击了相关按钮会有几种情况的弹出窗口”

Answer 3

    If List1.ListIndex = List1.ListCount - 1 Then   '判断是否为LIST1最后一项
        List1.ListIndex = 0                         '跳到LIST1第一项
    Else
        List1.ListIndex = List1.ListIndex + 1       '跳到下一项
    End If这代码我会.我不会抓取弹出窗口代码和加判断~