Jumat, 11 Juni 2010

Membuat Jam Digital dengan Microsoft Visual Basic 6.0

    Pada Artikel sebelumnya saya telah menuliskan cara untuk membuat Jam Analog dengan Visual Basic. Kali ini kita akan membuat sebuah jam digital menggunakan visual basic 6.0. Untuk membuatnya tentu sangat mudah berbeda dengan membuat jam analog sebelumnya yang sedikit rumit. Karena kita hanya akan menggunakan beberapa kontrol dan script yang pendek untuk membuat jam digital ini.
    Adapun langkah-langkah atau cara-cara membuatnya adalah sebagai berikut:
>>Buka program Visual Basic Anda (Disini selalu saya yakin jika anda telah menginstal program visual basic dikomputer anda dan anda sudah memiliki basic untuk menggunakannya).
>>Pada Form Anda Tambahkan sebuah kontrol label dan juga sebuah kontrol timer seperti gambar.1

Gambar.1 Form Lay Out

>>ubah propertisnya menjadi
Name    : Jam untuk label dan tmrjam untuk timer
Pada interval timer beri nilai selain nol misal 1000

>>selanjutnya klik dua kali kontrol timer atau buka jendela code dan ketikan listing berikut

Private Sub tmrjam_Timer()
Jam.Caption = Time
End Sub

>>Dan jalankan program yang anda buat. Hasilnya seperti ini
Gambar.2 Program yang telah jadi

Sedikit penjelasan:Listing program yang kita tulis " Jam.Caption = Time" akan mengambil waktu dari sistem sehingga waktu yang akan ditampilkan di Form adalah waktu dari sistem yang kita set dari komputer kita masing-masing.

Download Script Program ini Disini.




8 komentar:

  1. kalau mau membuat WIB,WITA dan WIT bagaimana?tidak harus sesuai waktu dari komputer?

    BalasHapus
  2. Terima kasih atas pertanyaannya.

    Untuk membuat Waktu WIB,WITA atau Wit,kita hanya perlu Membuat Perbedaan waktu 1 jam dari Waktu sebenarnya. Misal Anda berada di indonesia tengah maka waktu anda adalah wib+1 jam atau wit-1 jam. Jika kita ingin membuat waktu lainnya. Maka kita gunakan Lokasi dari tempat tersebut dengan waktu utama greenwich+15 derajat. Setiap 15 derajat waktu akan bertambah 1 jam dari waktu greenwich.


    Untuk membuat waktu yang tidak berdasakan waktu system di komputer kita, kita membutuhkan algoritma tambahan.

    Sekarang saya juga masih mempelajari algoritma untuk membuat waktu yang up to date.


    Silakan anda baca juga Membuat jam analog dengan visual basic

    BalasHapus
  3. pertanyanku sedikit meluas. bgaimana kalau ditampilkannya menggunakan seven segment? tlong diberi tutorialnya ya diblog ini, esok aku mampir lagi. regards

    BalasHapus
  4. Seven Segment yang dimaksud dalam bentuk simulasi atau dalam bentuk perangkat Hardware.
    Klo untuk simulasi, cukup kita gunakan Image dan berubah tiap waktu.
    Klo untuk hardware bisa kita rangkai jam digitalnya dan kita kendalikan menggunakan komputer melalui port paralel ataupun port serial.

    Terima Kasih atas kunjungannya!

    BalasHapus
  5. mas kalo biar automatis jalan sendiri saat windows jalan gimana ya?, apa pake scheduled task?

    BalasHapus
  6. mantap gan tutorialnya .. salam programer vb..

    BalasHapus
  7. Mav bang saya mw tanya disitu ga ada kejelasan cara pembuatan label waktunya
    tolong donk om di perjelas soalnya saya nga work
    klo bisa sich di perjelas semua
    (Newbie)

    BalasHapus
  8. @wildan : untuk menambahkan kontrol label sebenarnya tinggal tarik dan seret label kontrol yang ada di toolbox. selanjutnya ubah propertiesnya sesuai apa yang kau mau.

    BalasHapus

Hallo, Hallo!!!
Silakan tinggalkan jejak anda disini.

Terima Kasih!!! Salam Kenal, AndiSu.