[warhawk52]

Hi guys,

I put a time display on form1 thinking it would keep current time. The way I have it here turns it into a time stamp (not what I wanted)

Private Sub Form_Load()
Label11.Caption = Format$(Time, "hh:mm:ss AM/PM")
Label10.Caption = Format$(Now, "dddd, mmmm dd, yyyy")
End Sub

Question: How do I get the time in Label11 to keep current time automatically ???

Steve

[Amadeus]

Are you actually looking for some sort of clock effect? If so, the most immediate way would be to put the call to your time variables in a loop to keep them updating, but there may well be a better way.

[warhawk52]

Amadeus, on 6 Jan, 2007 - 10:22 AM, said:

Are you actually looking for some sort of clock effect? If so, the most immediate way would be to put the call to your time variables in a loop to keep them updating, but there may well be a better way.

Thanks, but I tried that and stalled the program out in the loop.

Steve

[m2s87]

I guess you wanted something like that this code would provide:

Dim WithEvents kell As Timer

Private Sub Form_Load()
	Set kell = Form1.Controls.Add("vb.timer", "kell", Form1)
	With kell: .Interval = 200: .Enabled = True: End With
End Sub

Private Sub kell_Timer()
	Label10.Caption = Format$(Time, "hh:mm:ss AM/PM")
	Label11.Caption = Format$(Now, "dddd, mmmm dd, yyyy")
End Sub

Hope it helped

[warhawk52]

m2s87, on 6 Jan, 2007 - 12:08 PM, said:

I guess you wanted something like that this code would provide:

Dim WithEvents kell As Timer

Private Sub Form_Load()
	Set kell = Form1.Controls.Add("vb.timer", "kell", Form1)
	With kell: .Interval = 200: .Enabled = True: End With
End Sub

Private Sub kell_Timer()
	Label10.Caption = Format$(Time, "hh:mm:ss AM/PM")
	Label11.Caption = Format$(Now, "dddd, mmmm dd, yyyy")
End Sub

Hope it helped

It worked!! Thanks!!

This post has been edited by warhawk52: 06 January 2007 - 04:15 PM

[born2c0de]

Quote

Thanks, but I tried that and stalled the program out in the loop.

You can also include DoEvents in the Loop to prevent the program from stalling as it allows the Operating System to process other events at the same time.