Timers in VB?

Hi everyone, in my program that I am currently making i want to use a ten second timer that appears on the screedn but that's not really the point. I am using a spreadsheet in my program which, as most of you will know, means that you use a slightly differnt version of visual basic. There is a not a timer listed on the toolbox and when i right click and go to additional controls there are so many i cant seem to find it there either.

can someone help?

Thanks

In Excel VBA there is no timer control for the toolbox but there is a built in timer function that is similar.

Quote:

---

Timer
Returns a Single representing the number of seconds elapsed since midnight.

---

Code:

---

    PauseTime = 5    ' Set duration.
    Start = Timer    ' Set start time.
    Do While Timer < Start + PauseTime
        DoEvents    ' Yield to other processes.
    Loop
    Finish = Timer    ' Set end time.
    TotalTime = Finish - Start    ' Calculate total time.
    MsgBox "Paused for " & TotalTime & " seconds"

---

Quote:

---

Originally Posted by RobDog888

In Excel VBA there is no timer control for the toolbox but there is a built in timer function that is similar.

Code:

---

    PauseTime = 5    ' Set duration.
    Start = Timer    ' Set start time.
    Do While Timer < Start + PauseTime
        DoEvents    ' Yield to other processes.
    Loop
    Finish = Timer    ' Set end time.
    TotalTime = Finish - Start    ' Calculate total time.
    MsgBox "Paused for " & TotalTime & " seconds"

---

---

Thanks, but i'm still a bit lost how would i make the 10 appear on the form in a label and then count down to zero with the timer?

Um, maybe update the label in the Do ... Loop?

Application.OnTime Now+ TimeValue("00:00:10"), 'Call Action

Depending on how you need to use the timer, both techniques will work for you.