Virus Palsu
hehehehee... setelah muter2 gak jelas, akh irnya saya menemukan sesuatu yg mungkin berguna buat ngejailin compi teman... Ok, langsung saja... Dim pass pass = " faza-afrizal.blogspot.com " MsgBox "Maaf, saat ini komputer anda telah terinfeksi virus berbahaya, segera anda kunjungi http://faza-afrizal.blogspot.com untuk medapatkan password penjinak virusnya. Jika dalam jangka waktu 5 menit anda belum mendapatkan passwordnya maka komputer anda akan mati untuk selamanya dan data anda akan hilang semua. Waktu 5 menit anda dimulai: " & Time, 16, "CBF team" Do code = InputBox("Masukkan password untuk menggagalkan virus ini.", "Virus Removal") If code<>pass Then MsgBox "Kode" & code & " Password yang anda masukan salah, segera kunjungi http://faza-afrizal.blogspot.com untuk mendapatkan passwordnya " End If Loop Until code=pass MsgBox "Password diterima, Komputer anda telah aman dari virus. Sela