Visual Basic - Potrebna pomoc

[Patrick]

Marko_L kaže:

Postoji. Otvoriš ponovo tu formu.

Sigurno pravam gresku posto nece . Koja je naredba?

[Marko_L]

Unload From1
Form1.Show

[Filip82]

Da li neko moze da mi pomigne, pravi bot-a koji treba da me zameni u radu na internetu. Problem mi je da kada program izvrsi komandu treba da saceka da se stranica ucita pa da nastavi sa daljim izvresenjem komandi.
primer:
kada izvrsi prvu liniju koda treba da saceka da ucita sledecu stranicu
pa onda da izvrsi sledecu linuju koda

WebBrowser1.Document.GetElementById("s1").InvokeMe mber("click")

WebBrowser1.Document.GetElementById("s1").InvokeMe mber("click")


Nadam se da sam bio jasan.
Unapred hvala.

[Nemanja015]

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        WebBrowser1.Tag = ""
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        WebBrowser1.Navigate("http://google.com/")
        WebBrowser1.Tag = "loading"
        Do While WebBrowser1.Tag = "loading"
            Application.DoEvents()
        Loop
        MsgBox("Done")
    End Sub
End Class