[anes]

(07-02-18, 04:19 PM)طالب برمجة كتب :

PHP كود :

Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
    For Each lnk As HtmlElement In WebBrowser1.Document.Links
        lnk.AttachEventHandler("onclick", AddressOf Link_Click)
    Next
End Sub
Private Sub Link_Click()
    If WebBrowser1.Document.ActiveElement.InnerText = "btn1" Then Button1.PerformClick()
    If WebBrowser1.Document.ActiveElement.InnerText = "btn2" Then Button2.PerformClick()
End Sub 


فيه مشكلة اخي