能否扑捉ie控件web browser中点击图片的事件.txt

VB技巧问答10000例 VB技巧问答10000例

WebBrowser显 示 的 都 是 HTML文 档 ， 你 可 以 在 HTML文 档 中 加 上 一 个 图 片 链 接 ， 当 用 户 点 击 后 ， WebBrowser控 件 会 产 生 BeforeNavigate事 件 ， 该 事 件 的 URL参 数 表 明 用 户 选 择 了 哪 个 链 接 。 你 可 以 在 这 个 事 件 中 激 活 自 己 的 程 序 ， 如 ： 
    Private Sub WebBrowser1_BeforeNavigate(ByVal URL As String, ByVal Flags As Long, ByVal TargetFrameName As String, PostData As Variant, ByVal Headers As String, Cancel As Boolean) 
     MsgBox "You click " + URL + "!" 
    End Sub 
<END>