Your coding is 110% wrong.

VB is not Basic or Pascal...you don't need infinate loops.

I'd have 2 timers.
One fires every 10 seconds to see what the time is and to see if it should start doing stuff.
If it does then it enables the other timer
if the time has run out then it should disable the other timer

You are using Goto's...BAD BAD BAD...do you realise how hard it is for us to debug an app like that Almost impossible.

I am almost sure that it's hanging coz of your infinate loops.

Post your current code that you have now.

Woka