Async process - Start Subroutine when finished

[Marcolino]

Hi All,
I'm using this code provided by Michael to run Async process:

http://groups.google.com/group/micro...6d19fccc330588

Now I have a new need. I have to start a Soubroutine when the Async
process is finished.

Many Thanks.

--Marco

[rowe_newsgroups]

On Apr 8, 10:43 am, Marcolino <[e-mail]:

Hi All,
I'm using this code provided by Michael to run Async process:

http://groups.google.com/group/micro...languages.vb/b...

Now I have a new need. I have to start a Soubroutine when the Async
process is finished.

Many Thanks.

--Marco

You can set up a callback from the BeginInvoke call that will fire
when the async process finishes. Then you can do whatever you need
from that method:

Here's a quick console demo app:

////////////////
Option Strict On

Module Module1

Public Delegate Sub AsyncDelegate()

Sub Main()
Console.WriteLine("Starting")
Dim worker As New AsyncDelegate(AddressOf AsyncMethod)
worker.BeginInvoke(New AsyncCallback(AddressOf
AfterAsyncMethod), Nothing)
Console.WriteLine("Asnyc called")

Console.Read()
End Sub

Private Sub AfterAsyncMethod(ByVal ar As IAsyncResult)
Console.WriteLine("AsyncMethod finished. Do something else")
End Sub

Private Sub AsyncMethod()
Console.WriteLine("Async is working")
'// Simulate work
System.Threading.Thread.Sleep(1500)
Console.WriteLine("Async is done working")
End Sub

End Module
////////////////

Thanks,

Seth Rowe [MVP]

[Spam Catcher]

rowe_newsgroups <ro********@yahoo.comwrote in news:424eb9ff-3910-40c0-
8b***************@e39g2000hsf.googlegroups.com:

Private Sub AfterAsyncMethod(ByVal ar As IAsyncResult)
Console.WriteLine("AsyncMethod finished. Do something else")
End Sub

Should call EndInvoke here - to clean up the Async handler?

--
sp**********@rogers.com (Do not e-mail)

[kimiraikkonen]

On Apr 8, 5:43 pm, Marcolino <[e-mail]:

Hi All,
I'm using this code provided by Michael to run Async process:

http://groups.google.com/group/micro...languages.vb/b...

Now I have a new need. I have to start a Soubroutine when the Async
process is finished.

Many Thanks.

--Marco

Marco,
You can also play with BackgroundWorker control and its events such as
RunWorkerCompleted, ProgressChanged events if it helps you.

Regards,

Onur Güzel

[Marcolino]

On 8 Apr, 18:50, kimiraikkonen <[e-mail]:

On Apr 8, 5:43 pm, Marcolino <[e-mail]:

Hi All,
I'm using this code provided by Michael to run Async process:

http://groups.google.com/group/micro...languages.vb/b...

Now I have a new need. I have to start a Soubroutine when the Async
process is finished.

Many Thanks.

--Marco

Marco,
You can also play with BackgroundWorker control and its events such as
RunWorkerCompleted, ProgressChanged events if it helps you.

Regards,

Onur Güzel

Hi I tryed this:
worker.BeginInvoke(New AsyncCallback(AddressOf AfterAsyncMethod),
Nothing)

but i have a little problem.
During sub AfterAsyncMethod() i need to populate a listview present on
main form. This is not possible because I cannot execute cross tread
operation.
I need that AfterAsyncMethod() will be executed on the main tread of
the application, after my async process is finished.

Thanks a lot