Posted by : Alfarady
Sabtu, 07 Juli 2012
Hello Sobat Blogger, Kali Ini Saya akan shere Cara Nembak Cwek with Flashdisk, Ini mah buat yg malu-malu ngucapin ke doi nya heheheee, tapi kalo anda yg udh punya pcr, di cobain gpp kok :D
Perlengkapan :
Warna MERAH Ganti dengan nama doi agan :D
Sudah ya sampai disini dulu, jika ada kata-kata yg tdk menyenangkan mohon dimaafkan
Perlengkapan :
- Notepad
- Flashdisk [Punya Doi]
- Buka Notepad
- Isikan Code ini : Dim Jika
Jika = InputBox ("A** aku sayang bnget sama kamu, aku cinta banget,sejak pertama kali aku kenal sama A** dan yang pasti mas seneng banget bisa kenal A**... , tapi yang pasti ini aku buat cuman buat buktiin kalo aku sayang bnget sama A**. Sekarang A** mau gak jadi pacar aku? ketik Y untuk ya or T untuk tidak.., lalu klik OK ya ^_^ ")
If UCase(Jika) = "Y" Then
MsgBox "Makasih ya Sayank... Love You Always, Number One For Me Deh... Emmuaccch.. :*"
ElseIf UCase(Jika) = "T" Then
MsgBox "Its Okay GPP ^_^"
Else
MsgBox "Cintya belom masukin jawabannya Pilihan hanya 'Y' untuk ya atau 'T' untuk tidak kok, ketik jawabannya yah ^_^ "
End If - Simpan di FlashDisk Doi
- Simpan Dengan Judul terserah pokoknya belakangnya .vbs
Warna MERAH Ganti dengan nama doi agan :D
Sudah ya sampai disini dulu, jika ada kata-kata yg tdk menyenangkan mohon dimaafkan
Wabillah Waltaufik Walhidayah
Wasalamu'alaikum WR. WB.