.jpg)
1) Buka NOTEPAD
 |
| Notepad |
Dim Jika
Jika = InputBox ("AKU SAYANG KAMU, waktu ketika aku ketemu kamu di facebook. Meski cuma lewat DUNIA MAYA, aku sayang kamu. 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, Number One For Me Deh... Emmuaccch.. :*"
ElseIf UCase(Jika) = "T" Then
MsgBox "Its Okay GPP ^_^"
Else
MsgBox "Kamu belum masukin jawabannya Pilihan hanya 'Y' untuk ya atau 'T' untuk tidak kok, ketik jawabannya yah ^_^ "
End If
3) Lalu pilih menu Save As pada Notepad
 |
| Save As |
4) Klik Save
5) Kemudian, Masukkan File .vbs tersebut ke FlashDisk
6) Dan Lihat Hasilnya
 |
| Hasilnya Kurang Lebih Seperti Ini |
7) Berikan flashdisk yang sudah dimasukkan file tersebut kepada cewek yang ingin kamu Tembak
Jika ingin form tersebut langsung muncul ketika flashdisk dimasukkan, buat file baru seperti langkah berikut :
1) Buka Notepad Kembali
 |
| Notepad |
2) Copy dan Paste Kode Berikut ini :
[autorun]
open=tes.vbs
3) Lalu pilih menu Save As pada Notepad
4) Klik Save
5) Dan masukkan File Tersebut ketempat yang Sebelumnya
6) Kemudian Lakukan percobaan sebelum dipraktekan, untuk menghindari Kesalahan
|
| Hasil Percobaan |
7) Jika Sudah Berikan flashdisk yang sudah dimasukkan file tersebut kepada cewek yang ingin kamu tembak.
