- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求助：如何在代码中加入条件，当出现“没有更多啦”就停止下拉，如果没有出现，就继续下拉。 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=92351)
-- 发布时间：2016/11/1 16:10:00
-- 求助：如何在代码中加入条件，当出现“没有更多啦”就停止下拉，如果没有出现，就继续下拉。
求助：如何在代码中加入条件，当出现“没有更多啦”就停止下拉，如果没有出现，就继续下拉。
此主题相关图片如下：11111.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:web.table |
当前代码如下：
Dim brw As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
brw.Address = "http://toutiao.com/m6051259851/"
Dim web As Object = brw.BaseControl
Do Until web.ReadyState = 4
Application.DoEvents
Loop
web.Document.Window.ScrollTo(0, 1520)
-- 发布时间：2016/11/1 18:23:00
--
移步至：http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=92345&skin=0