1. buka vb6 nya
2. buat form baru
3. buat 1 textbox(text = kosong), 1 button(caption : Mulai), 1 label, dan 1 timer(interval : 1000, enabled =
false)
4. masukan code ini :
button1 : label1.caption = text1.text 'label1 caption menjadi text 1 text nya timer1.enabled = true 'timer1 menyala
timer1 : label1.caption = label1.caption - 1 'perintah ini untuk mengurangi angka di label1 caption if label1.caption = 0 then label1.caption = 0 'perintah ini digunakan untuk mengurangi adanya bug label captionnya jadi -1 call shell("shutdown -s") timer1.enabled = false end iftest05:00AdminBandung Indonesia
