关于WebBrowser的简单问题，帮帮忙!

如何去掉WebBrowser边框？

解决方案 »

  1.   

    如果Web页面是你自己编辑的，可以在Html页面标记里<BODY>中加入
    <BODY Scroll="no">否则，可以这样：
    WebBrowser1.Document.Body.Scroll = "no"
    Private Sub mnuScroll1_Click() 
    '注意：必须在网页完全显示之后才可以运行 
    WebBrowser1.Document.body.Scroll = "no" '不显示滚动条的办法 
    End Sub 
    Private Sub mnuScroll2_Click() 
    '注意：必须在网页完全显示之后才可以运行 
    WebBrowser1.Document.body.Scroll = "Auto" '显示滚动条的办法 
    End Sub
      

  2.   

    放在一个图片框里：Private Sub Form_Load()
        Picture1.BorderStyle = 0
        WebBrowser1.Move -10, -10, Picture1.ScaleWidth + 20, Picture1.ScaleHeight + 20
        WebBrowser1.Navigate "http://www.baidu.com"
    End SubPrivate Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
        WebBrowser1.Document.body.Scroll = "no"
    End Sub