Decrementing a Time value?

How can I subtract 00:00:01 from , say 00:10:45 ?

Look in the help at DateAdd command; I can't test it right now but it should be something like;

NewTime = DateAdd("s",-1,OldTime)

Thanks for the help!

You also can substruct dates like you substruct numbers:

Code:

---

Private Sub Command1_Click()
    Dim datFirst As Date
    Dim datSecond As Date

    datFirst = #12:10:45 AM#
    datSecond = #12:00:01 AM#

    datFirst = datFirst - datSecond
    MsgBox datFirst
End Sub

---