padahal hampir setiap hari saya posting tapi masih saja kangen sama penggemar setia Biongo Attacker :'v . Disini ada tidak orang yang belum punya pacar atau jomblo? pasti ada donk sama seperti saya :'v . Oke jangan basa basi , di kesempatan kali ini saya akan kasih artikel agar kalian para pengunjung blog ini mendapatkan pacar :'v , yaitu artikel nya adalah cara menembak cewe dengan VB.6.0.Penasaran kan? makanya ikuti tutorialnya.
bahan-bahan :
- commandbutton
- label
- image
setelah bahan semua sudah anda buat dan sekarang tinggal design sedemikian rupa agar cewe nya juga suka nembaknya :'v , sebgai contoh lihat design yang saya buat ini.
usahakan design yang kalian buat semenarik mungkin agar pacar kalian bisa klepek-klepek atau nerima kalian :'v . Setelah selesai anda mendesign tampilannya sekarang kita tinggal masukkan code-code nya :)
Private Sub Command1_Click()
MsgBox "Terima Kasih kamu udah terima cinta ku.Aku berjanji akan mencitaimu selamanya.Dan kita akan membuat masa depan yang baru lagi ^_^", vbInformation, "I love you"
End Sub
Private Sub Command2_Click()
MsgBox "Pff., aku tidak di terima padahal aku sayang sekali kepada mu :'( Ya aku jadi jomblo lagi deh -_- ", vbExclamation, "-___-"
End Sub
Setelah semuanya selesai dengan baik silahkan anda jalankan aplikasinya dengan cara menekan F5 saja di keyboar anda.
Tampilan jika pacar kalian menekan tombol "Di Terima".
Tampilan jika orang yang kalian sayang mengklik "Di Tolak" :'v
Oke semua telah selesai dengan baik , saya pamit dulu ya.
Sekian Terima Kasih.