میشه در مورد این سورس که تو سایتی که آقا alimanam فرمودندکمی توضیح بدید؟؟؟
'The main mother class in .NET Framework to work with threading.
Imports System.Threading
'Creating Thread
Dim objThreadClass AsNew clsThread(2, Me)
Dim objNewThread AsNewThread(AddressOf objThreadClass.StartThread)
objNewThread.IsBackground = True
objNewThread.Start()
m_ThreadList.Item(1) = objNewThread
'Receiving Message from thread
PublicSub ReceiveThreadMessage(ByVal ThreadIndex AsInteger, _
ByVal Counter AsInteger)
'do your work here depending on the return variables from the thread.
EndSub
'Sending Message from thread to the main application.
'First create a delegate (For details plz see the comments inside the codes)
PrivateDelegateSubNotifyMainWindow(ByVal ThreadIndex AsInteger, _
ByVal Counter AsInteger)
'We need an object of this deletegate
Private m_NotifyMainWindow As NotifyMainWindow
'Assign the pointer to the method of the main window to the delegate
m_NotifyMainWindow = AddressOf MainWindow.ReceiveThreadMessage
'Create Argument List
ReDim m_Args(1)
m_Args(0) = m_ThreadIndex
m_Args(1) = m_Counter
'Call the notificaiton method on the main window by the delegate
m_MainWindow.Invoke(m_NotifyMainWindow, m_Args)