1.Buka Notepad
2.Copas kode berikut ini ke Notepad
Dim Jika
Jika = InputBox ("
sejak pertama kali q berkenalan dan melewati hari demi
dengan dirimu, aq selalu merasa nyaman berada di dekatmu. Karena itu
aku ingin kamu selalu menghiasi hari - hariku dengan menjadi pacarku..
Mau gak kamu jadi pacar aku ? ketik Y untuk ya or T untuk tidak.. lalu
klik OK ya ^_^ ")
If UCase(Jika) = "Y" Then
MsgBox "Makasih yah... Love You Always,Muacchhhh :*"
ElseIf UCase(Jika) = "T" Then
MsgBox "Its Okay gk apa² ko ^_^"
Else
MsgBox "Kamu belum masukin jawabannya Pilihan hanya 'Y' untuk ya atau 'T' untuk tidak kok, ketik jawabannya yah ^_^ "
End If
3. texs yang berwarna merah bisa anda ganti
dengan kata² kmu sendiri
4.Lalu pilih menu Save As pada Notepad
-Nama file terserah anda
-Tambah format
.vbs setelah nama file
-Contoh:
nembak seseorang.vbs
5.Klik Save
6.Masukkan file tersebut ke flashdisk
7.Lihat hasilnya
Selamat Mencoba Kawan...!!
tag : cara ampuh untuk nembak cw
cara untuk menembak cw
Title : cara nembak cw dengan plasdisk
Description : 1.Buka Notepad 2.Copas kode berikut ini ke Notepad Dim Jika Jika = InputBox (" sejak pertama kali q berkenalan dan melewati hari ...