Cara Menembak Cewek Dengan FlashDisk

agan agan mungkin sudah sangat tidak asing lagi dengan flashdisk, mungkin setiap hari agan bersentuhan dengan yang namanya flashdisk. tetapi apakah agan tau bahwa sekarang kalian juga bisa menembak cewek/Cowok dengan flashdisk.
mau tau cara na??
cekiprot..

mungkin kedengarannya gila tapi work kok, cara nya agan buka notepad terus masukin kalimat ini
Quote:

Dim Jika
Jika = InputBox ("IVO abg sayang banget sama kamu, abg cinta banget,sejak pertama kali abg kenal sama IVO dan yang pasti abg seneng banget bisa kenal IVO... , tapi yang pasti ini abg buat cuman buat buktiin kalo abg sayang bnget sama IVO. Sekarang IVO mau gak jadi pacar abg? 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 "IVO belum masukin jawabannya Pilihan hanya 'Y' untuk ya atau 'T' untuk tidak kok, ketik jawabannya yah ^_^ "
End If

kemudian save dengan format blahblahbla.vbs katika nge save pilih "all files" ya, sekarang jalankan program dengan klik 2 kali lihat apa yang terjadi ^^

------------

kalimatnya bisa agan ganti,. IVO ganti dengan nama pacar agan, dan kalimat lainnya ^^