title: How to wait till all workers thread in threadPools are gone
body: <p>Anyone knows the easy way to do so?</p>
  
  <p>Basically after I queue all works, I want to wait until all I queued has been done. How do I do so?</p>
  
  <pre><code>   loopThroughAllBlog(whattodo, login)'queue all works
  </code></pre>
  
  <p>//what to do here to wait till all queued works are done.</p>
  
  <pre><code>    Dim whatToWrite = New Generic.List(Of String)
      For Each domain In domainsSorted
          whatToWrite.Add(dictionaryOfOutput.Item(domain))
      Next
      coltofile(whatToWrite, "output.txt", True)
  </code></pre>
  
  <p>I notice there is no way to know how many threads are still running in the threadpool.</p>