Author: loggo | Posted on: 7/27/2009 7:40:40 AM | Views : 869

Hi! I have a question about Timers!
I want to make a Timer which counts down until a specific Date. I tried using Timers.Timer and following code, but the remaining Time is not displayed.



Protected Sub T_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Dim date2 As New Date Dim diff1 As System.TimeSpan date2 = Now() diff1 = Balaton.Subtract(date2) Dim Days As Integer = diff1.Days Dim h As Integer = diff1.Hours Dim min As Integer = diff1.Minutes Dim sec As Integer = diff1.Seconds Me.lblBalaton.Text = CStr(Days) & ":" & CStr(h) & ":" & CStr(min) & ":" & CStr(sec) End Sub
Has anyone an idea, what i do have to change?


Thank you.

...

Go to the complete details ...