状态的线程

Question

我用我application.I多线程的概念正在使用下面的代码

Dim threadHistory As Thread = Nothing 
       For Each dRow As DataRow In sqlDS.Tables(0).Rows 
        GetPropertyBidHistory(dRow("ID")) 
        threadHistory = New Threading.Thread(AddressOf GetRowHistory) 
        threadHistory.Name = "Row" + dRow("ID")  
        threadHistory.Start(dRow("ID"))      
        threadHistory.Join() 
       Next 

    Public Sub GetRowHistory(ByVal ID As String) 
      '1 min code from web srvice 
    End Sub 

如果我有10个编号的，我怎么能知道所有10个线程是否完成或没有。

Answer 1

您正在开始并逐个加入该线程。也就是说，不是你的意图。如果你保持这种方式创建单个线程，请等待它完成，然后才能继续下一个元素。

我会尝试以下方法：为每个线程将其添加到列表或数组和之后对于每一个/下一个语句，您可以加入他们所有的财产，我想，JoinAll()

Dim List(Of Thread) allThreads = new List 
Dim threadHistory As Thread = Nothing 

       For Each dRow As DataRow In sqlDS.Tables(0).Rows 
        GetPropertyBidHistory(dRow("ID")) 
        threadHistory = New Threading.Thread(AddressOf GetRowHistory) 
        threadHistory.Name = "Row" + dRow("ID")  
        allThreads.Add(threadHistory) 
        threadHistory.Start(dRow("ID"))      

       Next 
Thread.JoinAll(allThreads) 'Blocks until all the threads finish