Cara Membuat Label Countdown di Visual Basic 6



Hai! Kali ini, saya akan post tentang Cara Membuat Label Countdown di Visual Basic 6, sesuai dengan request Dimaz. Oke, ini dia caranya:

Tools:

  • Visual Basic 6
Step:
  1. Buka Visual Basic 6
  2. Tambahkan 1 Label, beri nama LabelDetik, Captionnya terserah
  3. Tambahkan 1 Timer, beri nama TimerDetik
  4. Dobel klik Form yang kosong, tambahkan kode di bawah ini:

  5. Dim detik As Integer

    Private Sub Form_Load()
    TimerDetik.Interval = 1000
    LabelDetik.Caption = "20"
    End Sub

    Private Sub TimerDetik_Timer()
    detik = LabelDetik - 1
    LabelDetik.Caption = detik
    If LabelDetik.Caption = "0" Then
    Call MsgBox("Game Over", vbInformation)
    TimerDetik.Interval = 0
    End If
    End Sub

  6. Note: Ganti 20 dengan berapa detik countdown yang akan dilakukan, Ganti Game Over dengan tulisan yang akan muncul apabila countdown selesai.
  7. Selesai
Sekian dulu posting kali ini. Terima kasih untuk Dimaz yang telah me-request artikel ini :)

Kode diatas adalah buatan saya sendiri :)


Komentar

3 Komentar di artikel "Cara Membuat Label Countdown di Visual Basic 6"

Nadirach_aqf48 mengatakan...

riq kalau buat menu drop down di blog gimana ???


20 Februari 2013 04.36
Anonim mengatakan...

Penjelesan yang singkat, jelas da mudah dimengerti... thanks bro infonya ....


25 Juni 2013 01.01
Rosyid W mengatakan...

Nice Share. Just Blog Walking. http://rosyidwijayanto4.blogspot.com/


15 Februari 2014 19.50

Poskan Komentar

Blog ini blog DOFOLLOW, jadi dapatkan backlink gratis hanya dengan berkomentar.

Recent Post

Popular Posts

Return to top of page Copyright © 2011-2012 | Ariq-XP Blog | Platinum Theme Converted into Blogger Template by Hack Tutors