VB.net - multithreading question

[VaxoP]

I havent got vb.net yet, thinking of purchasing it.

im just wondering, will

Public Sub thread1()
        WB.Navigate "http://www.google.ca"
        Do: Doevents: Loop until wb.busy = false
        debug.print "Done"
    End Sub
 
    Public Sub thread2()
        WB2.Navigate "http://www.google.ca"
        Do: Doevents: Loop until wb2.busy = false
        debug.print "Done"
    End Sub
 
    Public Sub AllThread()
        'Combine the two subs in one sub so they can be 
        'fired at once
        Me.thread1()
        Me.thread2()
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim thrd As Threading.Thread
        thrd = New Threading.Thread(AddressOf AllThread)
        thrd.Start()
 
    End Sub

will that Doevents run only for that specific thread? so that each thread will wait until the browser is done loading? or will once thread1 execute, the doevents will make the whole program wait for it to be done?

[jian2587]

me neither, but from my experience, as far as I can tell, DoEvents
is just to ask the thread to jump out of the procedure temporarily
and fire other events. So, if it's running in a new thread, even
if you don't put a DoEvents, it won't halt your process.
So I guess putting things like this won't halt stuffs:

Public Sub thread1()
        WB.Navigate "http://www.google.ca"
        Do: Loop until wb.busy = false
        debug.print "Done"
    End Sub
 
    Public Sub thread2()
        WB2.Navigate "http://www.google.ca"
        Do: Loop until wb2.busy = false
        debug.print "Done"
    End Sub
 
    Public Sub AllThread()
        'thread2 would still have to wait for thread1 to finish.
        'so this procedure is useless. I make two threads instead.
        'Me.thread1()
        'Me.thread2()
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim thrd1 As Threading.Thread
        Dim thrd2 As Threading.Thread
        Set thrd1 = New Threading.Thread(AddressOf thread1)
        Set thrd2 = New Threading.Thread(AddressOf thread2)
        thrd1.Start()
        thrd2.Start()
    End Sub

Your code should be just like above if you want both procedure
i.e thread1 and thread2 to run at once.

[crptcblade]

I'm pretty sure that the Thread class has a Sleep() method that suspends the current thread and allows others to execute. You would use that over a DoEvents. Application.DoEvents is just there for compatibility I imagine.

[VaxoP]

yea, but thread.sleep needs a value assigned with it (as in sleep x amount of time)

im pretty sure a do/loop will take 100% cpu as it loops over and over that same code until something changes to true..

is there any way to not use 100% cpu?

what would be the best way to download 2 pages with 2 webbrowsers and check if its done loading? (without using events)