Reply to thread

Message: [QUOTE="JohnH, post: 46762, member: 5139"] Timer is also unreliable in the run, if system is busy it will skip a second every now and then, at least that's what I have experienced. To overcome this you can save the starting DateTime (Date.Now) and loop until any current Date.Now subtracting the start is around the TimeSpan targeted. Example: [CODE]Sub timeout(ByVal seconds As Integer) Dim start As Date = Date.Now Do Until Date.Now.Subtract(start).Seconds >= seconds Application.DoEvents() Threading.Thread.Sleep(500) Loop End Sub [/CODE] [/QUOTE]