VB调用webbrowser技巧集1

博客介绍了使用VB操作浏览器的相关内容。包含通过代码实现点击按钮浏览网页、获取浏览器信息并在立即窗口输出,以及弹出Webbrowser消息窗口的功能,展示了具体的代码实现过程。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

1、获得浏览器信息:

Private Sub Command1_Click()
WebBrowser1.Navigate "http://www.applevb.com"
End Sub

Private Sub Command2_Click()
Dim oWindow
Dim oNav

Set oWindow = WebBrowser1.Document.parentWindow
Set oNav = oWindow.navigator
Debug.Print oNav.userAgent

Set oWindow = Nothing
Set oNav = Nothing
End Sub

点击Command1浏览网页,点击Command2在立即窗口中输出浏览器信息。

2、弹出Webbrowser消息窗口

Dim oWindow

Set oWindow = WebBrowser1.Document.parentWindow
oWindow.confirm "abcd"

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值