以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何让WebBrowser不出现滚动条  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=142356)

--  作者:goldenfont
--  发布时间:2019/10/24 21:21:00
--  如何让WebBrowser不出现滚动条
如题
--  作者:有点蓝
--  发布时间:2019/10/25 10:40:00
--  
Dim webCtl As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
Dim webb = webCtl.BaseControl
webb.ScrollBarsEnabled = False \'禁止滚动条
webb.ScriptErrorsSuppressed = True  \'禁止js错误提示
webb.IsWebBrowserContextMenuEnabled = False ‘禁止快捷菜单
webb.WebBrowserShortcutsEnabled = False ‘禁止快捷键

--  作者:goldenfont
--  发布时间:2019/10/25 11:08:00
--  
这个是禁用,能不让他显示吗?有Visible属性吗
--  作者:有点蓝
--  发布时间:2019/10/25 11:23:00
--  
禁用自然就不显示了,试过了吗?!
--  作者:goldenfont
--  发布时间:2019/10/25 11:47:00
--  
试了,刚开始出来还是有一个禁用的滚动条,然后我点击页面操作一下,滚动条就不出来了图片点击可在新窗口打开查看
--  作者:有点蓝
--  发布时间:2019/10/25 11:54:00
--  
试试先禁用,再设置网址

Dim webCtl As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
Dim webb = webCtl.BaseControl
webb.ScrollBarsEnabled = False \'禁止滚动条
webCtl.Address = "http://www.foxtable.com/"