vbMHWB控件同webbrowser一样

vbMHWB控件同webbrowser一样，是Web控件，但功能比webbrowser更强大，下面将介绍vbMHWB的一部分属性和方法。

一、使用vbMHWB控件浏览网页

    

Dim i As Integer

vbWB1.AddBrowser i

vbWB1.Navigate i, "www.baidu.com"

vbWB1.DocumentDownloadControlFlags = WBDOCDOWNLOADCTLFLAG_NO_DLACTIVEXCTLS ‘禁止加载多媒体元素，包括图片、声音、动画、影视

从上可以看出， vbMHWB控件和webbrowser使用方法有些区别，不过核心代码不变。

二、 vbMHWB控件的一些属性

vbWB1.DocumentDownloadControlFlags =

1、WBDOCDOWNLOADCTLFLAG_DLIMAGES ’允许所有图片下载

2、WBDOCDOWNLOADCTLFLAG_BGSOUNDS ‘允许所有声音下载

3、WBDOCDOWNLOADCTLFLAG_VIDEOS ’允许所有视频下载

4、WBDOCDOWNLOADCTLFLAG_NO_SCRIPTS ‘禁止Script执行

5、WBDOCDOWNLOADCTLFLAG_NO_JAVA ’禁止Java执行

6、WBDOCDOWNLOADCTLFLAG_NO_RUNACTIVEXCTLS ‘禁止Activex 控件执行

7、WBDOCDOWNLOADCTLFLAG_NO_DLACTIVEXCTLS ’不下载Activex控件

8、WBDOCDOWNLOADCTLFLAG_NO_FRAMEDOWNLOAD ‘不下载框架

9、WBDOCDOWNLOADCTLFLAG_NO_BEHAVIORS ’不下载Behavoirs（偶不懂这是啥意思有啥用的）

静默属性：（相当于webBrowser的Silent属性）

vbWB1.Silent=True或False

文档属性：

vbWB1.DocumentHostUiFlags=

1、WBDOCHOSTUIFLAG_DIALOG：禁止选择网页文本（使用了该项，你将不能选择网页的文本）

2、WBDOCHOSTUIFLAG_NO3DBORDER：使用普通边界

事件：（添加该控件，选择该事件，会有相应的参数出现）

vbWB1_NavigateError

Cancel=False ：禁止显示脚本错误提示

vbWB1_DocHostShowMessage

ShowMsgInternaly = False   ：禁止显示Http信息