Threading / updating textbox question

[Bmack500]

Hello! And thanks in advance. I have the following code which just
basically creates a set of threads for me (Using svrList as my list of
class instances to thread). Let's call the threads workerthreads.

The worker threads need to update a textbox on Form1 as they progress.

The question is, how do I create the necessary delegates / whatever to
update the textbox in a thread - safe manner?

The classes created in svrList are all instances of serverClass with
data passed to them during creation.

'Seed threadCount to get it started
threadCount = 1
'Okay, keep going while threads still exist
'If ther are no threads, create a new one as long as there are objects
left in svrList
While threadCount <0
If threadList.Count < My.Settings.numThreads And
svrList.Count 0 Then
Dim Server As serverClass = CType(svrList(0),
serverClass)
Dim svrThread As New Thread(AddressOf Server.getInfo)
threadList.Add(svrThread)
svrThread.Start()
svrList.Remove(Server)
threadCount = threadList.Count
End If
Dim iIndex As Integer = 0

For threadIndex = threadList.Count - 1 To 0 Step -1
sThread = CType(threadList(threadIndex), Thread)
If Not sThread.IsAlive Then
threadList.RemoveAt(threadIndex)
End If

Next

'Thread.Sleep(50)

End While

[Bmack500]

I wanted to clarify this a bit. It's fairly easy to do this when the
background thread is a subroutine on the form, using this technique:
http://msdn2.microsoft.com/en-us/lib...28(vs.80).aspx

But how do I call the setText routine when the background thread is in
a seperate class?

Bmack500 wrote:

Hello! And thanks in advance. I have the following code which just
basically creates a set of threads for me (Using svrList as my list of
class instances to thread). Let's call the threads workerthreads.

The worker threads need to update a textbox on Form1 as they progress.

The question is, how do I create the necessary delegates / whatever to
update the textbox in a thread - safe manner?

The classes created in svrList are all instances of serverClass with
data passed to them during creation.

'Seed threadCount to get it started
threadCount = 1
'Okay, keep going while threads still exist
'If ther are no threads, create a new one as long as there are objects
left in svrList
While threadCount <0
If threadList.Count < My.Settings.numThreads And
svrList.Count 0 Then
Dim Server As serverClass = CType(svrList(0),
serverClass)
Dim svrThread As New Thread(AddressOf Server.getInfo)
threadList.Add(svrThread)
svrThread.Start()
svrList.Remove(Server)
threadCount = threadList.Count
End If
Dim iIndex As Integer = 0

For threadIndex = threadList.Count - 1 To 0 Step -1
sThread = CType(threadList(threadIndex), Thread)
If Not sThread.IsAlive Then
threadList.RemoveAt(threadIndex)
End If

Next

'Thread.Sleep(50)

End While