Thread et timer conjugués dans des MDIChild

Bonjour,
J'utilise une application avec des MDI. Une de mes MDI active un Thread qui se vide à la fin de son éxécution (son éxécution à une durée indéterminée). J'aimerais pouvoir créé un timer qui se déclenche à la fin des intruction du Thread (sachant que l'utilisateur peut se balader dans les autres MDI entre temps). Voici mon bout de code:

PrivateSub BtLancer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtLancer.Click

MonThread =

New Threading.Thread(AddressOf ComeOn)

Control.CheckForIllegalCrossThreadCalls = False

MonThread.IsBackground = True

MonThread.Start()

EndSub

Private

Sub ComeOn()
'...

'Mes instructions de mon Thread
'...

BtLancer.Text =

"Lancer le transfert"

MonThread.IsBackground =

False

MonThread =

Nothing

Timer1.Enabled =

True

EndSub

PrivateSub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

MsgBox(

"Bonjour")

Timer1.Enabled = False

EndSub

L'ensemble de ce code est partie intégrante de ma MDI, le timer1 est un objet de ma MDI.
1- Mon gros problème : "Bonjour" ne s'affiche jamais alors que mon boutton BtLancer.Text prend bien la valeur désirée.
PS : Timer fixé à 2000 ticks.
2- La fonction sleep fonctionne parfaitement et est donc une parade, mais pourquoi le timer ne fonctionne pas, alors qu'avec une simple activation du timer via un bouton fonctionne.

Merci d'avance.