[VB8] Clock [How To]

[KuscheltierDompteur 0]

You need a label and a timer

 

Name the label: Time, o´clock, ...

 

 

Doubleklick on Timer1

 

Typ in:

 

Dim h As String = My.Computer.Clock.LocalTime.Hour

Dim m As String = My.Computer.Clock.LocalTime.Minute

Dim s As String = My.Computer.Clock.LocalTime.Second

If m < 10 Then m = "0" + m

If h < 10 Then h = "0" + h

If s < 10 Then s = "0" + s

Label1.Text = h & ":" & m & ":" & s

 

It have to look like this:

 

 

Doubleklick on Form:

 

Timer1.Start

 

Debbuggen--> finished

 

 

Credits ~me alias .:ViRuZ:.~

 

You can leech this Tutorial.

Edited January 23, 2009 by {¯´'·.¸!gRoUnDzErO!¸.·'´¯}

[Kart0ffel 0]

lool nice O_O

[marcus-k 0]

This is my clock:

[BlackLabel™ 0]

Warum so umständlich ?

 

Timer1 auf enabled = true stellen

 

label machen

 

und dann in den timer :

 

Label1.Text = TimeOfDay

 

 

fertig ?