Thursday, April 28, 2016

Tutorial Membuat Timer Menggunakan Aplikasi Visual Basic 6.0

Tutorial Timer menggunakan visual basic 6.0 by Ardhana

Assalamu'alaikum Wr.Wb

Kali ini,saya akan memberikan tutorial singkat tentang pembuatan "Timer" menggunakan aplikasi software Visual Basic 6.0 yaa,langsung saja kita buat aplikasi tersebut.

A.Pengertian Timer

   Timer adalah kontrol yang berfungsi menghitung waktu pada Visual Basic. Kontrol ini menggunakan jam internal yang terdapat pada komputer Anda.
Pada saat program dijalankan kontrol Timer ini tidak akan tampak pada layar Properti yang sering digunakan pada kontrol Timer ini adalah Interval.
Misal interval=500 ini artinya 0.5 detik.


B.Langkah-langkah pembuatan Timer :

1.)Jalankan Aplikasi Microsoft Visual Basic 6.0

2.)Buatlah Rancangan Tampilan Yang Ingin Di Buat

3.)Setelah Itu Ubah Properties Rancangan Seperti Berikut :


Objek/Kontrol          Properties                        Value

Form1                     Name                              frmTimer1
                              Caption                           Tentang Program
                              ControlBox                       False

Picture1                  Name                              PicDasar
                              BackColor                        Putih

Image1                   Name                            imgTentang
                              Picture                          (Rancang teks di Word Lalu                                                                              pastetepat di atas image)

Timer1                    Name                            tmrGerak
                              Interval                          20

Command1              Name                            cmdSelesai
                              Caption                          &Selesai

4.) Masukkan Kode Pemograman Seperti Yang Ada Di Bawah Ini.

Kode Program :

Private Sub cmdSelesai_Click()
Unload Me
End Sub

Private Sub tmrgerak_Timer()
If imgTentang.Top + imgTentang.Height >= -1 * (picDasar.ScaleHeight - imgTentang.Height) Then imgTentang.Top = imgTentang.Top - 20 Else imgTentang.Top = picDasar.ScaleHeight
End Sub

5.) Setelah Selesai Semua Tekan F5 Pada Keyboard PC/Laptop Untuk Memastikan Jalannya Aplikasi.

6.) Selamat Jika Aplikasi Berjalan Dengan Benar.

Sekian Tutorial Dari Saya,Kurang Lebihnya Mohon Maaf hehe...



Wassalamu'alaikum Wr.Wb
Jadi Jutawan Cuma Modal Nulis

1 comment:

  1. terima kasih atas artikel anda yang menarik dan bermanfaat ini. semoga memberikan manfaat bagi pembacanya. saya memiliki artikel sejenis yang bisa anda kunjungi di sini IT GUNADARMA

    ReplyDelete

Sudah siap punya toko online sendiri?

Back to top