Some help with threading needed.

[Solarion]

I have this sort of structure

SUB MAIN ()

Sub PullData1()
Sub PullData2()
Sub PullData3()

END SUB()

Each Sub pulls from the DB and dumps it into a new section of a spreadsheet worksheet. The problem is the program is hanging as the overall process takes about 30 seconds (lots of data).

What I want to achieve is in between each sub, or inside each sub, I want to update a progress bar.

There are so many different types of threading and background worker examples on the net that I've become bogged down and confused with what I actually need.

Any advice would be greatly appreciated.

 

[biometrics]

VBScript? I see there is no DoEvents in VBS. How about a timer to fire off the next sub? Does VBS have timers?

 

[Solarion]

VBScript? I see there is no DoEvents in VBS. How about a timer to fire off the next sub? Does VBS have timers?

VB.NET.

 

[Solarion]

I found this article. I was looking for something quick and easy but it seems to accomplish this I'm going to have to become an expert on threading.

http://www.codeproject.com/Articles/26148/Beginners-Guide-to-Threading-in-NET-Part-of-n

 

[Solarion]

Found something that might help. Using 2 or more background workers

Option Strict On
Option Infer Off

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles Me.Load
        ' start Process 1
        BackgroundWorker1.RunWorkerAsync()
    End Sub

    Private Sub BackgroundWorker1_DoWork(sender As System.Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
        ' Process 1 code
    End Sub

    Private Sub BackgroundWorker1_RunWorkerCompleted(sender As System.Object, e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles BackgroundWorker1.RunWorkerCompleted
        ' start Process 2 (at Process 1 completed)
        BackgroundWorker2.RunWorkerAsync()
    End Sub

    Private Sub BackgroundWorker2_DoWork(sender As System.Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker2.DoWork
        ' Process 2 code
    End Sub

    Private Sub BackgroundWorker2_RunWorkerCompleted(sender As System.Object, e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles BackgroundWorker2.RunWorkerCompleted
        ' both Processes completed
    End Sub

End Class

 

[etienne_marais]

VB.NET.

What you want is fairly easy in C#, I would guess it should be in VB.NET as well but perhaps time to upscale ?

 

[etienne_marais]

I think you should try BackGroundWorker alongside ReportProgress: http://www.vbforums.com/showthread.php?680130-Correct-way-to-use-the-BackgroundWorker

 

[Solarion]

I think you should try BackGroundWorker alongside ReportProgress: http://www.vbforums.com/showthread.php?680130-Correct-way-to-use-the-BackgroundWorker

Time for some reading then. Thanks etienne.

 

[etienne_marais]

I think you should try BackGroundWorker alongside ReportProgress: http://www.vbforums.com/showthread.php?680130-Correct-way-to-use-the-BackgroundWorker

In fact, if you are in a hurry, the example should suffice as a framework around which you can implement your own, but of course the studying will get you further in the long run.

 

[tRoN]

I was going to mention laser hair removal is more effective....then I read some posts.

 

[Solarion]

In fact, if you are in a hurry, the example should suffice as a framework around which you can implement your own, but of course the studying will get you further in the long run.

After pulling a late night I managed to come right. That article you linked was a massive help thanks!!