Foxtable(狐表)用户栏目专家坐堂 → 求助:实现WebBrowser1网页多次自动滚屏 怎么操作啊?目前论坛有办法可以自动滚屏一次!


  共有1956人关注过本帖平板打印复制链接

主题:求助:实现WebBrowser1网页多次自动滚屏 怎么操作啊?目前论坛有办法可以自动滚屏一次!

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


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
求助:实现WebBrowser1网页多次自动滚屏 怎么操作啊?目前论坛有办法可以自动滚屏一次!  发帖心情 Post By:2016/11/1 15:25:00 [只看该作者]

论坛代码:
Dim brw As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
brw.Address = "http://www.foxtable.com/"
Dim web = brw.BaseControl
Do Until web.ReadyState = 4
    Application.DoEvents
Loop
web.Document.Window.ScrollTo(0, 1520)
实现打开之后自动滚屏一次,
有没有办法实现多次滚屏呢?

 回到顶部