nach bestimmter zeit ereignis auslösen

[cy0st]

hi
steh vor einem wahrscheinlich sehr einfachen problem
ich will in eine oder mehrere textboxen eine bsetimtme zeit eingeben (bsp: 1h 5m)
und nach ablauf dieser zeit soll er eien bestimmte website besuchen
hab bissl mim timer herumexperementier aber nix gescheits rausbekommen
kann mir wer helfen?

 

[wincnc]

Hallo, versuch´s mal so.
Die Zeitangabe in der TextBox muss folgendes Format haben: 01:05:00

Dim Zeit As Date

Private Sub Command1_Click()
 Timer1.Interval = 1000
 Timer1.Enabled = True
 Timer1_Timer
End Sub

Private Sub Timer1_Timer()
Zeit = DateAdd("s", 1, Zeit)

If Trim(Zeit) = Trim(CDate(Text1)) Then
 Timer1.Enabled = False
 ' Browser starten
End If

End Sub