Jumat, 05 Desember 2014

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

0 komentar: