Ini tutorial ane dapet dari cakwin, langsung aja! Buat modelnya seperti gambar dibawah ini....
Komponen yang dibutuhkan :
1. Label : - Name : Label1
- Font :sesuai selera.
2. Timer : - Name : Timer1
- Delay : 1000
- Enabled : True
Aturlah posisi komponen sedemikain rupa :D
Code program Jam Digital Ala Gambas sangat sederhana. Doubel klik timer1 dan ketik kode berikut :
PUBLIC SUB Timer1_Timer()
Label1.Caption = Format(Time, "hh:nn:ss")
END
Keterangan : hh = menunjukan jam
mm = menunjukan menit
ss = menunjukan detik
Coba jalankan....
Komponen yang dibutuhkan :
1. Label : - Name : Label1
- Font :sesuai selera.
2. Timer : - Name : Timer1
- Delay : 1000
- Enabled : True
Aturlah posisi komponen sedemikain rupa :D
Code program Jam Digital Ala Gambas sangat sederhana. Doubel klik timer1 dan ketik kode berikut :
PUBLIC SUB Timer1_Timer()
Label1.Caption = Format(Time, "hh:nn:ss")
END
Keterangan : hh = menunjukan jam
mm = menunjukan menit
ss = menunjukan detik
Coba jalankan....
Komentar
Posting Komentar
Ramaikan Blog Ini Dengan Komentar-Komentar Anda
Bebas, Sopan, Ataktif, Kritik Juga Boleh