Source Code Visual Basic 6.0

ALL SOURCE CODE

 

 Bahan yang Dibutuhkan : Visual Basic 6.0 (Klik Jika Ingin Mendownload)

Source Buat Game Di Visual Basic :

Game Hangman

Game Mobil Balap 

Game 3D (Final Selection) 

Source Code Anti Virus :

Super Anti Virus

ATV Guard Computer (AntiVir)

Sekian Dari Saya 

Untuk Source Code Selanjutnya Tunggu OK

Read More

Membuat Anti Virus Dengan NotePad

Bahan Untuk Membuat:
1.NotePad (kalau gak ada Parah Tuh Compi Nya ampe Gak ada NotePad Nya)


Copy Code Ini Ke NotePad Kalian (Tulisan Berwarna Merah Bisa Kalian Ganti Sesuka Kalian)

@echo off
title AntiVirus luucky
:a
cls
echo Anti Virus

echo  
echo.
echo.
echo 1.Start Scan
echo 2.Exit

Simpan Dengan Cara Clik File Save AS

echo luucky ANTI VIRUS
set /p choice=
if %choice%==1 goto scan
if %choice%==2 goto exit
goto a
:scan
cd C:\WINDOWS\system32
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
echo.
echo.
echo.
echo Scan Complete!
echo No Viruses Detected.
pause
goto a
:exit
exit                             

jangan Di save Dlu ...
Ganti Nama Dengan Contoh: (Vorceza.txt ) kalian ganti menjadi (Vorceza.bat)
Sekian Dari Saya

Note:Cara penggunaan Dengan cara tekan 1 trus enter


Contoh:
Tampilan Sebelum Scan

Read More

Membuat Browser With VB.6

Download Visual Basic Portable nya >>> Disini

Setelah Di download Kalian Extract Tuh
Klik 2x Visual Basic 6 Portable

Klik Reg Key , Trus Kilik yes 2x
















1.Setelah itu kilik Run Visual Basic 6
2.pilih standart.exe
3.Klik components/CTRL+T, dan cari component “Microsoft Internet Controls,” checklist dan klik “Apply” lalu “Close.”
4.Klik Comand Button 
dan buat 5 comand buttton
masing Beri nama 
-command 1GO (buat menelusuri Browser
-command 4 Forward            -Command 3 Back
-command 2 Stop
-commadn 5 Refresh
5.klik  Internet Controls (sesuaikan Dengan Browser Kamu)
6.buat 1 text box ini akan jadi URL bar
7.buatr 1 text box lagi ini akan jadi Loading Browser


CONTOH:

Masukkan Code nya Ke form mu (klik 2x aja FORM mu)


Private Sub Command1_Click()
WebBrowser1.Navigate Text1.Text
WebBrowser1.SetFocus
End Sub


Private Sub Command2_Click()
WebBrowser1.Stop
End Sub


Private Sub Command3_Click()
WebBrowser1.GoBack
End Sub


Private Sub Command4_Click()
WebBrowser1.GoForward
End Sub


Private Sub Command5_Click()
WebBrowser1.Refresh
End Sub


Private Sub WebBrowser1_ProgressChange(ByVal Progress As Long, ByVal ProgressMax As Long)
If Progress > 0 Then
Text2.Text = Progress & "/" & ProgressMax
End If
End Sub



Kalo sudah Selesai Jadiin Project dah
Klik File (di pojok Kiri atas)
Klik Make Project.exe
Jadi deh 

Read More

Hacked Proctector

Ini semacam Anti Virus

sangat Berguna juga untuk Men-Suspend,Resuma,And End Prosess Game/Internet DLL

Ini Contoh Gambar nya:

Jika Ingin Download Klik:

Download Disini ALL

Read More