Aggiungi un "DoEvents" dopo allo Sleep(100). Così dovrebbe risolversi.

Ciao