VB6.0中使用webbrowser，如何隐藏滚动条？

Question

使用WebBrowser1.Document.body.Scroll = "no"后显示 该对象不支持该属性或方法，是否需要专门引用什么函数或API？区区20分不成敬意，抱歉我的财富里只有这20分，
谢谢njw4155329 ，谢谢各位，只是，我的需求中，WebBrowser的大小是动态的，并且是多窗口的，所以，这个通过.调整WebBrowser大小掩盖滚动条的方法也不能满足要求啊，网上好多回答都是WebBrowser1.Document.body.Scroll = "no" 但在vb6中写到WebBrowser1.Document. 时后边就没有对象出来了，也不知道说这样可行的朋友有没有亲自验证过，

Answer 1

不能在form_load中使用。
在窗口完全引导之后，在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

Answer 2

放一个framebox，frame名字删掉，把listbox放frame里，listbox的top改成-1，left改成-1，宽高适当调整让滚动条在framebox外边。

Answer 3

最简单的办法：
1.加入一个picturebox,在其中放置一个WebBrowser
2.调整WebBrowser大小，大于picturebox大小，即隐藏了滚动条

Answer 4

Private Sub Command1_Click()
WebBrowser1.Document.body.Scroll = "no"
End Sub

Private Sub Form_Load()
WebBrowser1.Navigate "about:blank"
End Sub

Answer 5

是什么网址发来看看 才好发代码