16.1 Memformat Tanggal dan waktu menggunakan format yang telah ditetapkan
Tanggal dan waktu dapat diformat dengan menggunakan format yang telah ditetapkan dan juga user-defined format. Format yang sudah ditetapkan tanggal dan waktu ditunjukkan pada Tabel 16.1.
Tabel 16.1 Predefined format tanggal dan waktu
* Daripada "Jenderal tanggal", nama dan Kembali juga dapat menggunakan format yang disingkat "G", yaitu Format (Now, "G"). Dan untuk "Long Time", Anda dapat menggunakan format disingkat "T". Adapun "Waktu Singkat", Anda dapat menggunakan format disingkat "t"
contoh 16,1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label1.Text = Format(Now, "General Date")
Label2.Text = Format(Now, "Long Date")
Label3.Text = Format(Now, "short Date")
Label4.Text = Format(Now, "Long Time")
Label5.Text = Format(Now, "Short Time")
End Sub
Hasilya seperti di bawah ini :

16,2 Memformat Tanggal dan waktu menggunakan user-defined format
Selain menggunakan format yang telah ditetapkan, Anda juga dapat menggunakan fungsi user-defined format. Format umum dari user-defined untuk tanggal / waktu adalah
Format (expression,style)
Tabel 16.2 Beberapa user-defined fungsi format tanggal dan waktu
contoh 16.2
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click, Button3.Click
Label1.Text = Format(Now, "M")
Label2.Text = Format(Now, "MM")
Label3.Text = Format(Now, "MMM")
Label4.Text = Format(Now, "MMMM")
Label5.Text = Format(Now, "dd/MM/yyyy")
Label6.Text = Format(Now, "MMM,d,yyyy")
Label7.Text = Format(Now, "h:mm:ss tt")
Label8.Text = Format(Now, "MM/dd/yyyy h:mm:ss tt")
End Sub
Hasilnya seperti dibawah ini:

0 comments :
Posting Komentar