CARA MEMBUAT JAM DIGITAL DI VISUAL BASIC

CARA MEMBUAT JAM DIGITAL DI VISUAL BASIC

Langkah-langkah yang harus di ikuti untuk membuat jam digital pada VB 2008

1. Buka Vb 2008 yang anda punya , FIle -> New -> Project, dan nanti akan muncul kotak project, kemudian anda tentukan folder untuk menyimpan program tersebut.
   
2. Dan nanti akan muncul Form baru, langkah selanjutnya anda design form tersebut yaitu dengan memasukan komponen toolbox seperti
   
   Label
   kemudian di properties atur
   Name : Vwaktu
   Text : Waktu
   
   Timer
   kemudian di properties atur
   Name : Timer1
   Text : Timer 1
   Enabled : True ( aktif )
   Interval : 1000
   
   Kira-kira seperti berikut hasil designnya
3. setelah sudah siap mendesign, langkah selanjutnya yaitu masuk ke halaman Code / Syntax.
   Doubel Click di Form, kemudian ketikkan syntax :
   
   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
   VWAKTU.Text = Format(Now, "HH:mm:ss")
   End Sub
   
   keterangan :
   Vwaktu menampilkan waktu sekarang yang ada pada sistem komputer
   HH ==> waktu 24 jam ( 01:00 s/d 24:00)
   mm ==> Minute (60)
   ss ==> Secoond ( 60)
4. setelah sudah siap mendesign, langkah selanjutnya yaitu masuk ke halaman Code / Syntax.
   Doubel Click di Timer1, kemudian ketikkan syntax :
   
   Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
   VWAKTU.Text = Format(Now, "HH:mm:ss")
   End Sub
   
   keterangan :
   Vwaktu menampilkan waktu sekarang yang ada pada sistem komputer
   HH ==> waktu 24 jam ( 01:00 s/d 24:00)
   mm ==> Minute (60)
   ss ==> Secoond ( 60)
5. Setelah itu coba anda jalankan program tersebut dengan cara tekan di keyboard F5
   ,hasilnya kurang lebih seperti berikut :

Semoga bermakna