VB6.0中使用webbrowser,如何隐藏滚动条?
使用WebBrowser1.Document.body.Scroll="no"后显示该对象不支持该属性或方法,是否需要专门引用什么函数或API?区区20分不成敬意,抱歉我...
使用WebBrowser1.Document.body.Scroll = "no"后显示 该对象不支持该属性或方法,是否需要专门引用什么函数或API?区区20分不成敬意,抱歉我的财富里只有这20分,
谢谢njw4155329 ,谢谢各位,只是,我的需求中,WebBrowser的大小是动态的,并且是多窗口的,所以,这个通过.调整WebBrowser大小掩盖滚动条的方法也不能满足要求啊,网上好多回答都是WebBrowser1.Document.body.Scroll = "no" 但在vb6中写到WebBrowser1.Document. 时后边就没有对象出来了,也不知道说这样可行的朋友有没有亲自验证过, 展开
谢谢njw4155329 ,谢谢各位,只是,我的需求中,WebBrowser的大小是动态的,并且是多窗口的,所以,这个通过.调整WebBrowser大小掩盖滚动条的方法也不能满足要求啊,网上好多回答都是WebBrowser1.Document.body.Scroll = "no" 但在vb6中写到WebBrowser1.Document. 时后边就没有对象出来了,也不知道说这样可行的朋友有没有亲自验证过, 展开
展开全部
不能在form_load中使用。
在窗口完全引导之后,在WebBrowser1.Navigate 完成以后。
然后用WebBrowser1.Document.body.Scroll = "no" 就可以了。
从WebBrowser1.Document.body.Scroll = "no" 的结构你就能看出来,是对WebBrowser1的Document对象设置的scroll属性,在form_load中使用时,webbrowser1还没加载,在.navigate之前使用时还没有document,肯定会出错。
在窗口完全引导之后,在WebBrowser1.Navigate 完成以后。
然后用WebBrowser1.Document.body.Scroll = "no" 就可以了。
从WebBrowser1.Document.body.Scroll = "no" 的结构你就能看出来,是对WebBrowser1的Document对象设置的scroll属性,在form_load中使用时,webbrowser1还没加载,在.navigate之前使用时还没有document,肯定会出错。
追问
代码如下:
Private Sub Command1_Click()
Form1.WebBrowser1.Document.body.Scroll = "no"
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "F:\AreaMedia\播放ppt&网页文件\Rate Board(20080903B).ppt "
End Sub
运行之后,点击按钮出现提示框,如图,
你可以给我一个完整示例么?谢谢,
追答
这是直接播放的ppt文件,不是显示的网页文档。你这个滚动条是ppt控件的,不是webbrowser1的,没有很好的解决办法。可以试试:
1.加大webbrowser1宽度 webbrowser1.width=form1.width+20
2.将ppt文件存成html文件
3.利用api获取控件句柄,取消控件的scroll
展开全部
放一个framebox,frame名字删掉,把listbox放frame里,listbox的top改成-1,left改成-1,宽高适当调整让滚动条在framebox外边。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
最简单的办法:
1.加入一个picturebox,在其中放置一个WebBrowser
2.调整WebBrowser大小,大于picturebox大小,即隐藏了滚动条
1.加入一个picturebox,在其中放置一个WebBrowser
2.调整WebBrowser大小,大于picturebox大小,即隐藏了滚动条
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2011-03-13
展开全部
Private Sub Command1_Click()
WebBrowser1.Document.body.Scroll = "no"
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "about:blank"
End Sub
WebBrowser1.Document.body.Scroll = "no"
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "about:blank"
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
是什么网址发来看看 才好发代码
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询