Cara mengirim Pesan ke Cewek dengan Flashdisk

12.09 |


Langkah Pertama :

1.Buka notepad
  Contoh pesan :

Dim Jika
Jika = InputBox ("Abg sayang ucuaq,walaupun abg gak twu harus ngomong gimna.seperti embun yg jatuh ke Daun yg gk akan bisa d pertanyakan.Sekarang Ayang percaya gak sama tulusnya hati abg ? ketik Y untuk ya or N 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) = "N" Then
MsgBox "Its Okay GPP,Mungkin cara ini bukan temaksud Romantis ^_^"
Else
MsgBox "Ayank belom masukin jawabannya Pilihan hanya 'yes' untuk ya atau 'no' untuk tidak kok, ketik jawabannya yah ^_^ "
End If

Kemudian save dengan format pesanku.vbs ketika nge save pilih "all files" ya, sekarang jalankan program dengan klik 2 kali lihat apa yang terjadi ^^

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

kalimatnya bisa agan or sist ganti²,.^^

Good Luck

0 komentar:

Posting Komentar