Showing posts with label Digital Clock. Show all posts
Showing posts with label Digital Clock. Show all posts

Creating Digital Clock...........

Thursday, 22 March 2012
Step 1:
Create New Windows Application

Step 2:
Add Following Controls On The Form

Label1:      Set Font To "OCR A Extended"
                 Set ForColor To "Lime"
                 Text To "00.00.00.AM"

Timer1:      Set Enable="True"
                  Interval="100"

And Set Forms Text Property To "DIGITAL CLOCK"

Step 3:
Add Following Code To Timers Tick Event And Forms Load Event Respectively.........

Code:
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Label1.Text = Microsoft.VisualBasicTimeOfDay
End Sub



Code:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Enabled = True
        Timer1.Interval = 1000

End Sub