Avatar billede pissed_squirrel Nybegynder
22. marts 2003 - 12:46 Der er 4 kommentarer og
1 løsning

Real-time visning af tid ??

Hvordan er det muligt at få den til at vise den aktuelle tid, så det faktisk er et ur ??

Jeg har denne her kode i min form:

Dim strTime As String
strTime = Format(Now, "mm/dd/yy hh:mm:ss")
StatusBar1.Panels(2).Text = strTime
Avatar billede terry Ekspert
22. marts 2003 - 12:58 #1
You need to place a timer on the form
Avatar billede terry Ekspert
22. marts 2003 - 13:02 #2
Private Sub Timer1_Timer()
In the from load event

Timer1.Interval = 1000
Timer1.Enabled = True


Dim strTime As String

strTime = Format(Now, "mm/dd/yy hh:mm:ss")
StatusBar1.Panels(2).Text = strTime

End Sub
Avatar billede terry Ekspert
22. marts 2003 - 13:03 #3
oops

In the from load event

Timer1.Interval = 1000
Timer1.Enabled = True


Then
Private Sub Timer1_Timer()
Dim strTime As String

strTime = Format(Now, "mm/dd/yy hh:mm:ss")
StatusBar1.Panels(2).Text = strTime

End Sub
Avatar billede pissed_squirrel Nybegynder
22. marts 2003 - 16:27 #4
Mange tak
Thanks a lot :D
Avatar billede terry Ekspert
22. marts 2003 - 16:32 #5
selv tak :o)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester