WebBrowser 控件。.Document.InnerHTML = ''。

解决方案 »

  1.   

    Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE about:<B>实验</B>", vbNormalFocus:)~~~~~~
      

  2.   

    使用WebBrowser控件,工程->部件->Microsoft Internet ControlsPrivate Sub Command1_Click()    WebBrowser1.Document.body.innerHTML = "<b>实验</b>"
        
    End SubPrivate Sub Form_Load()    WebBrowser1.Navigate2 "about:blank"     '打开一个空白的网页,完成控件初始化
        
    End Sub注意两行语句不能放一起,必须等webbrowser初始化后才可以