I have got a ten second timer working in my program using the code,

VB Code:
  1. Application.Wait Now + TimeValue("00:00:10")

I now want to show the seconds on screen as they are going down. I came up with the following idea to do this,

VB Code:
  1. Application.Wait Now + TimeValue("00:00:10")
  2.        
  3.         ClockTimer = 0
  4.         Do
  5.             ClockTimer = ClockTimer + 1
  6.             TimeValue ("00:00:ClockTimer")
  7.             lblTimer.Caption = ClockTimer
  8.         Loop Until ClockTimer = 10

i now realise how stupid this is since it waits till the ten seconds are up to run the loop, and the code doesn't work anyways, but can anyone think of a way to adapt my code slightly to make it work?