Re: [VB6 ] 在 WebBrowser 中呼叫程式裡的Function …
※ 引述《Mitnick (-..---.--...---..-.-)》之銘言：
: 請問要如何在 WebBrowser (IE) 裡呼叫 VB 程式裡的 Function 或 Sub
: 假設我在程式裡有一個按鈕叫 Command1,一個 WebBrowser 叫 Web1
: 然後我將 Web1 填入了一個連結的 HTML Code
: With Web1
: .Navigate "about:blank"
: .Document.open
: .Document.write "<a href=""#######"">Call Command1</a>"
: .Document.Close
: End With
: 希望做到能夠在按下該連結時，能夠呼叫VB程式中的 Command1
: 請問有解決的方法嗎？
: 感謝 :)
先抓取 <A> 物件, 然後連結Click事件到 Command1 的 EventHandler
Web1.Document.GetElementsByTagName("a")(0). _
AttachEventHandler("onclick", AddressOf Command1_Click)
Private Sub Command1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Command1.Click
MessageBox.Show("Hello World")
End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 122.127.41.107
推
04/24 10:01, , 1F
04/24 10:01, 1F
→
04/24 10:01, , 2F
04/24 10:01, 2F