Estoy usando el ejemplo del Electro_Hacker publicado en los Snippet...

 
#Region " New Thread "
 
    Public Thread_is_completed As Boolean = False
    Public Want_to_cancel_thread As Boolean = False
 
    ' Usage:
    '
    Dim Thread_Var_Name As System.Threading.Thread = New Threading.Thread(AddressOf MiThread)
    ' Thread_Var_Name.IsBackground = True
    ' Thread_Var_Name.Start()
    ' Thread_Var_Name.Abort()
    ' Thread_Var_Name.Suspend()
    ' Thread_Var_Name.Resume()
 
    ' While Not Thread_is_completed = True
    '    Application.DoEvents()
    ' End While
 
    Sub MiThread()
        ' Do something inside this thread
    End Sub
 
#End Region
 
 

Cuando lo ejecuto me funciona bien pero cuando mando a cerrar la aplicacion no lo hace, que puedo estar haciendo mal aqui...acaso falta algo...

Salu2

Suele pasar xD