كد ساعت بسيار ساده

[ahmadfononi]

()Private Sub Timer1_Timer
Label1.Caption = Time
End Sub

​