WebBrowser1.Navigate2 "about:blank"
    WebBrowser1.Document.open
    WebBrowser1.Document.writeln "<HTML>"
    WebBrowser1.Document.writeln "<HEAD>"
    WebBrowser1.Document.writeln "<TITLE>"
    WebBrowser1.Document.writeln "New Document"
    WebBrowser1.Document.writeln "</TITLE>"
    WebBrowser1.Document.writeln "</HEAD>"
    WebBrowser1.Document.writeln "<BODY scroll=" & VBA.Chr(34) & "no" & VBA.Chr(34) & " oncontextmenu=self.event.returnValue=false>"
    WebBrowser1.Document.writeln "</BODY>"
    WebBrowser1.Document.writeln "</HTML>"
    WebBrowser1.Document.Close这段代码大概是什么意思?能不能帮调试通过?请教请教!

解决方案 »

  1.   

    你试一下就知道了,其实没什么>>>>WebBrowser1.Navigate2 "about:blank"
    >>>>WebBrowser1.Document.open打开一个白板网页往里写HTML,>>>>WebBrowser1.Document.writeln "<TITLE>"
    >>>>WebBrowser1.Document.writeln "New Document"
    >>>>WebBrowser1.Document.writeln "</TITLE>"
    加了个标题"New Document",>>>>scroll=" & VBA.Chr(34) & "no"不出现滚动条,>>>>oncontextmenu=self.event.returnValue=false>"点右鼠标不出现菜单
      

  2.   

    谢谢大侠的答复!
    我copy您的代码:Private Sub Form_Load()
        WebBrowser1.Navigate2 "about:blank"
        WebBrowser1.Document.open
        WebBrowser1.Document.writeln "<TITLE>"
        WebBrowser1.Document.writeln "New Document"
        WebBrowser1.Document.writeln "</TITLE>"
        Scroll = " & VBA.Chr(34) & "no"
        oncontextmenu = self.event.returnValue = False > ""
        WebBrowser1.Document.Close
    End Sub
    是这样吗?如果是,有两个错误:
    (1)Scroll = " & VBA.Chr(34) & "no"一句报:
    编译错误
    缺少:语句结束
    去掉该句前面的" &变成Scroll = VBA.Chr(34) & "no"就没有出错了.是这样吗?(2)oncontextmenu = self.event.returnValue = False > ""一句报:
    实时错误"424"
    要求对象不知为什么?
    请教请教!谢谢先!
      

  3.   

    我上面只是解释而已,你原来的语句将会产生一个类似这样的页面<HTML>
    <HEAD>
    <TITLE>
    New Document
    </TITLE>
    </HEAD>
    <BODY scroll="no" oncontextmenu=self.event.returnValue=false>
    </BODY>
    </HTML>
      

  4.   

    但我的电脑里webbrowser控件是一片空白,什么也没有显示,不知为什么?
    大侠能不能在您的电脑里运行一下看看行不行?谢谢先!
      

  5.   

    明白了.谢谢先!
    请教:哪里可以找到webbrowser的方法和属性的详细资料?这个控件好像无所不能一样,让人不知从哪里学起.请教请教!
      

  6.   

    try this:    WebBrowser1.Navigate2 "about:blank"
        WebBrowser1.Document.open
        WebBrowser1.Document.writeln "<HTML>"
        WebBrowser1.Document.writeln "<HEAD>"
        WebBrowser1.Document.writeln "<TITLE>"
        WebBrowser1.Document.writeln "New Document"
        WebBrowser1.Document.writeln "</TITLE>"
        WebBrowser1.Document.writeln "</HEAD>"
        WebBrowser1.Document.writeln "<BODY scroll=" & VBA.Chr(34) & "no" & VBA.Chr(34) & " oncontextmenu=self.event.returnValue=false>"
        ' add a line to show your something
        WebBrowser1.Document.writeln "hello, imur "
        WebBrowser1.Document.writeln "</BODY>"
        WebBrowser1.Document.writeln "</HTML>"
        WebBrowser1.Document.Close
      

  7.   

    很简单:将其他的部分去掉,将HTML文本考下来,浏览就可以那大楷意思是用写浏览器内容,和打开文件没什么两样。
    我的软件下载地址:http://www.cnkernel.com
      

  8.   

    谢谢两位高人!
    请教:哪里可以找到webbrowser的方法和属性的详细资料?这个控件好像无所不能一样,让人不知从哪里学起.
      

  9.   

    我有,很棒的,可以控制里面的所有东西,但是不是免费的
    http://www.cnkernel.com smartmail
     中有演示
      

  10.   

    谢谢xiaohuangtao(绿毛网虫)对我的问题的答复!http://expert.csdn.net/Expert/topic/2441/2441947.xml?temp=.9653742请问:您要多少钱才能给我您所说的webbrowser的材料?
        能不能给我一份webbrowser的各种功能的列表,好让我对您的材料的价钱估计一下?
        谢谢先!
      

  11.   

    webbrowser的方法和属性的详细资料MSDN里面就有啊。非常详细。
      

  12.   

    你可以看msdn,那里非常详细,只是不知道你的英语
      

  13.   

    WEBBROSER对于WINDOWS应用程序来说,太需要了.但是大多数人对此好像不知道哦
    其 实 整个资源管理就是以WEBBROWSER派生来的.
      

  14.   

    用好WEBBROSER实际上是如何控制好,WEBBROWSER中的基类.得到基础类,然后就可以组建自己的资源管理器哪!!!!!!!