Webbrwser控件史上最强技巧全集.docVIP

Webbrowser控件史上最强技巧全集 VB调用webbrowser技巧集1、获得浏览器信息：Private Sub Command1_Click()WebBrowser1.Navigate End SubPrivate Sub Command2_Click()Dim oWindowDim oNavSet oWindow = WebBrowser1.Document.parentWindowSet oNav = oWindow.navigatorDebug.Print oNav.userAgentSet oWindow = NothingSet oNav = NothingEnd Sub点击Command1浏览网页，点击Command2在立即窗口中输出浏览器信息。2、弹出Webbrowser消息窗口Dim oWindowSet oWindow = WebBrowser1.Document.parentWindowoWindow.confirm abcdVB调用webbrowser技巧集2向Webbrowser中写入HTML内容的几种方法首先在Form_Load中加入WebBrowser1.Navigate about:blank确保Webbrowser1可用方法1：Dim s As StringDim str