Membuat Jam Digital dengan visual basic 6.0

Membuat jam Digital dengan bahasa pemrograman visual basic memang sangat sederhana dan ada beberapa cara... hanya memasukan beberapa code saja, Langsung dehh jadi,, hehehe nggaya :-D,,
untuk lebih jelasnya kita praktekan saja.. oke??

berikut langkah-langkahnya :

1. buat New project - Standard Exe
2. masukan 2 buah Label
3. masukan 1 buah timer, ubah interval menjadi 1000
4. lalu masukan code berikut :

Private Sub Timer1_Timer() label1.caption = Date '/untuk menampilkan tanggal pada label1 label2.caption = Time   '/untuk menampilkan waktu pada label2 End Sub 

Penjelasan code :

• Date =  menampilkan tanggal sekarang
• Time =  menampilkan waktu sekarang

Teman-teman juga bisa mengganti code di atas dengan code di bawah :

Private Sub Timer1_Timer() label1.caption = Format(Now, "dd-mm-yyyy") label2.caption = Format(Now, "h:n:s") End Sub

Lalu silahkan running !!
Penjelasan code :

•  Format(Now, = code format untuk waktu&tanggal sekarang
• d = day (hari) , 
• m = month (bulan), 
• y = year (tahun)
• q = quartal
• w = hari ke-
• c = menampilkan secara lengkap tanggal dan waktu 
• h = hour (jam)
• n = minute (menit) 
• s = second (detik)
• jika d dan m hanya ditulis 2 huruf, maka akan di tampilkan "d=tanggal" dan "m=bulan ke-". sedangkan jika di tulis lebih dari 2 huruf, maka yang muncul adalah "d=nama hari" dan "m=nama bulan". berikut contohnya :
• jika ditulis dd-mm-yy maka yang muncul adalah 13-07-12
• jika ditulis dddd-mmmm-yyyy maka yang muncul adalah Jumat-Juli-2012
• sebenarnya untuk minute(menit) menggunakan m juga bisa,, tapi harus diawali dengan "h(hour)". jika hanya "m" nya saja, maka yang muncul bukan menit, tapi month(bulan)
• code diatas bisa di gabung-gabungkan,, contoh jika kita mengetik code berikut:
• Format(Now, "dddd-h-n") lalu setelah di running keluar "jumat-21-45" artinya hari jumat pukul 21.45 .
• Format(Now, "n-s") maka akan keluar "45-30" artinya 45 menit 30 detik