cara jitu nembak cewek

buat anda-anda semua yang pengen nembak cewek dengan menggunakan skrip atau apapun yang berhubungan yang namanya komputer. Pasti anda semua bingung gimana caranya ...
gak lucu kan kalo anda menggunakan word atau powerpoint kalo ingin nembak cewek .. ??
hahahaha :-D

saya punya sedikit solusinya nih buat yang pengen bikin skrip buat anda yang mungkin ingin membuat cewek gegebetan anda senyam senyum dengan skrip yang anda buat ... hehhee

langkah pertama ...
1. ajak sang gegebetan ke warnet ( jangan yang remang-remang yah sobat ... bahaya !!! )
2. maen aja seperti biasanya
3. nahhh ... anda bisa membuat skrip seperti di bawah ini ..

Dim Jika
Jika = InputBox (" Isikan kata-kata untuk nembak cewek/cowok yang Anda sukai ")
If UCase(Jika) = " isikan kata-kata yang menyatakan persetujuan, contoh : IYA(harus huruf besar)" Then
MsgBox " isikan kata-kata jika cewek/cowok yang Anda suka mengisikan kata persetujuan pada kotak dialog"
ElseIf UCase(Jika) = " isikan kata-kata yang menyatakan penolakan, contoh : TIDAK(harus huruf besar)" Then
MsgBox " isikan kata-kata jika cewek/cowok yang Anda suka mengisikan kata penolakan pada kotak dialog"
Else
MsgBox " isikan kata-kata yang jika cowok/cewek yang Anda sukai tidak menyatakan persetujuan/penolakan "
End If

seperti contoh ...

 Dim Jika
Jika = InputBox ("LESTI ... aku sayang banget sama kamu, kalo aku boleh tanya sama kamu .. kamu juga cinta dan sayang gak sama aku ... ??? tekan Y untuk ya dan N untuk tidak")
If UCase(Jika) = "Y" Then
MsgBox "I Love You sayank, mmwah ~^_^~"
ElseIf UCase(Jika) = "N" Then
MsgBox "aku gak akan nyerah buat dapetin kamu"
Else
MsgBox "Pilihan hanya 'Y' untuk ya atau 'N' untuk tidak "
End If

simpan dengan dengan menggunakan ektensi .vbs ( misalnya : sayang.vbs )
setelah kamu buat dan kamu simpan didalam FD anda ...
anda bisa langsung membukanya dan TARAAAA .... skripnya bekerja ..
dia pasti senyam senyumm ...

NP : diterima atau tidaknya itu udah jadi resiko anda semua ... :-)

terima kasih

0 komentar: