Menampilkan jam dan tanggal di Visual Basic

Private Sub Timer1_Timer() On Error Resume Next lblwaktu.Caption = Format(Date, "d/m/yyyy") lbljam.Caption = Format(Now, "hh:mm:ss") End Sub
Sesuaikan sendiri Nama label dan timernya.