Cara membuat Date dan Time di vb 2013

Date dan Time

Script / listing programnya :

Public Class Form1

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Dim a, b As String
a = Format(Now, "dddd dd/MM/yyyy")
b = Format(Now, "hh:mm:ss")
Label1.Text = a & ", " & b
End Sub

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub
End Class

Hasilnya :

Sekian dari saya, + saya minta maaf yang setulus-tulusnya.

Semoga bermanfaat.

• Tweet
• Share
• Share
• Share
• Share

About Admin Salis - Informasi

Nama      : RACHMAN SALISTIANTO
Sekolah   : SMK N 2 KLATEN
Alamat    : KRAKITAN, BAYAT, KLATEN, SEMARANG (JAWA TENGAH), INDONESIA

Related Post