kali ini gue bakalan ngeshare ilmu gue dikit, yaitu bikin jam digital pke Vb. 6.0...hehehee
rada basi sih..tapi lumayan lah buat sekedar ilmu pengetahuan.
langkah pertama
1.buka program visual basik, setelah itu pilih stdr.exe.
2.tambahkan label dan timer
3.ubah nama pada timer menjadi tmrWaktu dan ubah intervalnya jadi 1000.
4.ubah nama label menjadi lblJam
5.klik 2 kali pada timer trus masukin kode ini
lblJam.Caption = Format(Now, "dddd, dd mmmm yyyy, hh:mm:ss")
ni lengkapnya
Private Sub tmrWaktu_Timer()
lblJam.Caption = Format(Now, "dddd, dd mmmm yyyy, hh:mm:ss")
End Sub
habis tu jalanin dah program kita. Walopun sederhana yg penting kan bisa jala
rada basi sih..tapi lumayan lah buat sekedar ilmu pengetahuan.
langkah pertama
1.buka program visual basik, setelah itu pilih stdr.exe.
2.tambahkan label dan timer
3.ubah nama pada timer menjadi tmrWaktu dan ubah intervalnya jadi 1000.
4.ubah nama label menjadi lblJam
5.klik 2 kali pada timer trus masukin kode ini
lblJam.Caption = Format(Now, "dddd, dd mmmm yyyy, hh:mm:ss")
ni lengkapnya
Private Sub tmrWaktu_Timer()
lblJam.Caption = Format(Now, "dddd, dd mmmm yyyy, hh:mm:ss")
End Sub
habis tu jalanin dah program kita. Walopun sederhana yg penting kan bisa jala






0 Comments:
Posting Komentar