Membuat Auto Timer Pada Saat Start Kick Mig33 ( vb6 )

Selasa, 22 November 2011
Lagi dapat Koneksi buat Posting ,Alhamdulillah yah.. kali ini aQ akan post cara membuat auto timer pada saat start kick di mig33, sebenarnya banyak cara untuk bikin auto timer ini , Aq akan bahas salah satunya aja
( karena cara yang lain Aq gag tau  ),
Untuk lebih mudahnya kita pakai sampel yang pertama aja  biar kalian pindah sendiri ntar ke sampel Multy ..
Sekarang kita bikin control2 yang di perlukan ...
Pertama Tambahkan Timer kemudian kasih nama : timerz , kemudian setting properties timerz tersebut seperti ini :
Kedua ,Bikin 1 Label Baru kasih nama = TextTim
Ketiga ,Tambahkan CheckBok kasih nama = CheckTimer
Sekarang kita lanjut ke Source.:D
Tambahkan Koding dibawah ini pada data Arrival :
If CheckTimer.Value = Checked Then
If InStr(1, LCase(DatIn), “a vote to kick” ) Then
Timerz.Enabled = True
End If
End If
Itu Fungsinya buat Membaca kata A vote to kick pada saat start kick dimulai.

Klik 2 kali pada timerz tadi kemudian tambahkan :
TextTim.Caption = Val(TextTim.Caption) – 1

Kemudian Klik 2 kali pada label TextTim tadi, ubah TextTim_Click ( )  menjadi TextTim_Change ( ) , Tambahkan :
If TextTim = 0 Then
Timerz.Enabled = False
TextTim.Caption = 60
End If

Udah Aq Tes pada sampel pertama dan WORKED :P
Selamat Mencoba :D..


Terima kasih sudah membaca Membuat Auto Timer Pada Saat Start Kick Mig33 ( vb6 ) dan sempatkan untuk membaca yang lainnya broth..
TEMPLATE DESIGN BY
m-template - by: bagas96

4 komentar:

Balas Bukyung™

Pengen belajar kang dit. Tp PC msh erot terus. . . :D

Balas diteri

@Kang Bukyung™ : Hayu kang Cuang sami-sami belajar .. aQuh ge nembean da :-d

Balas Bukyung™

Kang dit c0ment na t bs reply. IdBlog di templatena blum d r0bah kayana. . . Hayu mulai dr mana yeuh blajar vb.

Balas diteri

@ Kang Bukyung™ : muhun aCan di Omean :D.... hayu Cuang Belajar bareng kang.. Mulai dari dunlud vb6 na weh dulluh =))

copy smiley kode

Posting Komentar

I orange fress script kang bagas96 copyright 2011
diteri.mig33.us