- Create a form and add
- Label for time, Label for date
- Timer tool
- Import
- Imports System.Windows.Forms.VisualStyles.VisualStyleElement.TaskbarClock
Imports System.Windows.Forms.VisualStyles.VisualStyleElement.TaskbarClock
Public Class digitalclock
Private Sub digitalclock_Load(sender As Object, e As EventArgs) Handles MyBase.Load
lbTime.Text = TimeOfDay
lbDate.Text = Date.Today.ToString("dd MMM, yyyy")
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
lbTime.Text = TimeOfDay
End Sub
End Class
Download source code for free: Digital Clock
Note: This script is working fine with Visual Studio 2012 and above.
0 comments :
Post a Comment