如何才能设置WebBrower控件中页面的颜色和控制滚动条

[kimpkswm]

在一个Form窗体中，有个WebBrowser控件，这个控件连接到一个指定的网页。
现在想在WebBrowser连接到指定的网页后，将WebBrowser所显示的该页面的颜色全部统一更改为一种颜色。

另外，如何才能通过程序来控制该控件的滚动条的滚动（不通用SendKey，不知SendMessage能否实现）？

谢谢各位大虾赐教！

[supergreenbean]

可以在WebBrowser控件的DocumentComplete等事件里获得该网站页面的对象，比如document，window等对象。有了这些对象你就能完全控制页面。滚动的话你可以通过在页面中执行脚本达成目的。

Private WithEvents m_oDocument As HTMLDocument

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Set m_oDocument = pDisp.Document

    m_oDocument.bgColor = vbBlack
End Sub

[junki]

WebBrowser和MShtml结合起来一起使用