/ Published in: VB.NET
Expand |
Embed | Plain Text
Copy this code and paste it in your HTML
Private Sub TimerRelogio_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TimerRelogio.Tick Me.lblTime.Text = Date.Now End Sub Private Sub frmMDIParent_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TimerRelogio.Start() End Sub