Kamis, 11 Agustus 2011

Cara Membuat Label Berkedip di Visual Basic 6

Mungkin, sudah banyak yang Posting tentang Cara Membuat Label Berkedip di Visual Basic 6, tapi tidak ada salahnya jika saya juga memposting cara ini.
Oke, Langusng saja ya!

  1. Buat label baru beranama Label1. Caption nya terserah.
  2. Lalu, Buat Timer baru Bernama Timer1.
  3. Masukkan Kode berikut (klik kanan, view code)
  4. Private Sub Form_Load()
    Timer1.Interval = 200
    End Sub
    Private Sub Timer1_Timer()
    Label1.Visible = Not Label1.Visible
    End Sub
  5. Angka 200 diganti sesuai selera. Semakin kecil angkanya, maka semakin cepat berkedip. Begitu juga sebaliknya.
Sekian dari saya, semoga bermanfaat.

    Tidak ada komentar:

    Posting Komentar