mungkin ada mgkin cewek yg agan suka tapi ingin nembak dengan cara unik dan kreatif .. gak usah panjang lebar ..
caranya ;
1. Buka Notepad.
2. Copas kode dibawah ini kedalam Notepad!.
Dim dika
Jika = InputBox ("Apakah Kamu Mencintaiku Selamanya?. Ketikkan YA Atau TIDAK")
If UCase(Jika) = "Tidak" Then
MsgBox "Ungkapkan Kata Sayang Kamu!"
ElseIf UCase(Jika) = "YA" Then
MsgBox "TERIMA KASIH ATAS JAWABANNYA. AKU TIDAK AKAN PERNAH MENINGGALKANMU!. AKU CHAYANK KAMU SELAMANYA.. MMUUUAACHHHH"
Else
MsgBox "KENAPA KAMU TIDAK MENCINTAIKU SELAMANYA?. PADAHAL AKU SANGAT MENCINTAIMU.. :(. JANGAN TINGGALKAN AKU SAYANKKKKK.."
End If
3. Klik Save. Berikan nama Baca Ini.vbs
4. Buka file notepad tadi yang kamu simpan dan lihat hasilnya.
"Anda bisa menggonta - ganti teks yang ada di dalam notepad ini sesuai keinginan anda."
5. Copy file tadi pada flashdisk cewek yang agan cintai.
6. Selesai :D.
sreenshoot:
Sign up here with your email
ConversionConversion EmoticonEmoticon