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.

ConversionConversion EmoticonEmoticon

:)
:(
=(
^_^
:D
=D
=)D
|o|
@@,
;)
:-bd
:-d
:p
:ng