Nah..
Agan Tau nhe Apliikasi Buat Apa??
aplikasi INI Adalah Aplikasi Pengganti Regedit..
Dan Bisa Memanipulasi Virus...
agan tidak percaya???
Nhe DownloadNya:
downlo...
yang Mau Download bIsa Langsung.,.,.,
Kali Ini Saya Tidak Mau Basa-Basi...
Karna Juga Saya Lagi Bnyak Urusan Ya .,.,
saya Minta Maaf.,.,
-=-=-=-=-=-=-=-=-
visual Basic 6
-=-=-=-=-=-=-=-=-
Download--:> Click H...
Hanya Sebuah Code Anda Bisa Memindahkan Kontrol Dengan Drag-Drop Saat Aplikasi RunTime..
Ikuti Langkah-langkahNya
-:>buatlah sebuah Form dengan sebuah Button / tombol didalamnya
Di bagian 'Command1_MouseMove' ketikkan :
Static l As Integer, t As Integer
If Button = 1 Then
Command1.Left = (Command1.Left + X) - l
Command1.Top = (Command1.Top + Y) - t
Else
l = X
...
maaf karna Code Dan Posting Yang Saya Smpaikan Singkat...
Mungkin walaupun Singkat Saya Bisa Membantu Anda.,.,
kali Ini saya membahas Tentang Cara Menutup/Mematikan Form Dengan Menekan Tombol Escape (Esc) pada Keyboard
Ikuti langkah-LangkahNya:
-:>Pertama, ubah properti "KeyPreview" dari Form menjadi True
Lalu ketikkan kode berikut di bagian 'Form_KeyPress'
If KeyAscii = vbKeyEscape Then Unload Me
Sekian...
Code Dibawah Digunakan Untuk mematikkan Dobble Clik Mous..
menggunakan VisualBasic 6.0
Di bagian '(Declarations)' dari Form ketikkan :
Private Declare Function SetDoubleClickTime Lib "user32.dll" (ByVal wCount As Long) As Long
Di bagian 'Form_Load' ketikkan :
App.TaskVisible = False
Me.Hide
Lalu di bagian 'Timer1_Timer' ketikkan :
SetDoubleClickTime...
-:>Buat Project baru dengan sebuah Form
-:>Masukkan ke dalam Form tersebut 1 kontrol Label
-:>1 kontrol Tombol / Button
-:>1 buah kontrol Timer (Enabled=False; Interval=1000)
Ikuti Langkah-LangkahNya:
1.Di bagian '(Declarations)' dari Form ketikkan :
Dim Jam As Integer, Menit As Integer, Detik As Integer
Di bagian 'Form_Load' ketikkan :
Label1.Caption = "00:00:00"
Di bagian 'Command1_Click' ketikkan...
Code Di Bawah Digunakan Untuk membuat Start Button Di Taskbar Bisa Berkedip..
Berikut TahapNya:
-:>Tambahkan 1 kontrol Timer (Enabled=True; Interval=300) ke dalam Form tersebut
Di bagian '(Declarations)' dari Form ketikkan :
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32.dll"...
Buat Project Baru Dengan Form DidalamNya.,.,.,
kemudian Tambahkan Kontrol Label (untuk menampung hasilnya) ke dalam dorm tersebut
lalu ketik Kode Dibawah Ini Di Bagian Form_Load
Dim Win As Object
For Each Win In GetObject("winmgmts:").InstancesOf("Win32_OperatingSystem")
Label1.Caption = Win.Caption & vbCrLf & Win.CSDVersion & vbCrLf & "Version : " & Win.Version & vbCrLf & "Build : " & ...
Code Dibawah INI Berguna Untuk membelokir USB Drive
LayakNya seperti
-FlashDisk
-memorry Card .dll
Tetapi Tidak Bisa Membelokir HardWare Lain Yang Menggunakan USB...
Seperti:
-Modem
-Printer
Berikut CodeNya:
Dim Reg As Object
Set Reg = CreateObject("Wscript.Shell")
Reg.RegWrite "HKLM\System\CurrentControlSet\Services\USBSTOR\Start", 4, "REG_DWORD"
jika ingin mengembalikan Seperti Semula
Ketik Code INI:
Dim...
-:|>VisualBasic 6.0
==============================================================
-:> Buat Form Baru (BorderStyle=None)
-:> Sebuah Timer (Enabled=True; Interval=10)
Di bagian '(Declarations)' dari Form ketik:
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal...
====================================
--:>VisualBasic 6.0
====================================
YouTube Downloader
Download Source Code Di Bawah:
Download
Suatu Krya Besar Pasti Akan Tercapai Jika Ana Benar-benar Ingin Berusaha.,,.,
Jangan Lupa Click Like Page BLOG Ini eaa..
By : AlexCucuMbahGoogle
Faceb...
-=-=-=-=-=-=-=-=-=-=-=-=-
-:>VisualBasic 6.0
-=-=-=-=-=-=-=-=-=-=-=-=-
Buatlah project baru dengan pilihan standart exe, buatlah 2 buah timer, timer ini nantinya digunakan untuk mengaktifkan jam sedangkan timer yang kedua digunakan untuk mengaktifkan stopwatch, kemudian isi kedua buah interval timer dengan nilai disesuaikan dengan kebutuhan. Selanjutnya buat 3buah commandbutton,
Button1 isi caption dengan nilai...
-=-=-=-=-=-=-=-=-=-=-
-VisualBasic 6.0
-=-=-=-=-=-=-=-=-=-=-
Download Source Code --> Click Hare!!
===========================================
Selamat Berkarya....
Suatu Benda/Barang Akan Berbunga DiTangan Anda
Apabila Anda Mau Berusaha Tuk Menjadi yang Terbaik!!
By:AlexCucuMbahGoo...
1. Virus akan mencari file-file. JPG pada folder dan subfolder satu tingkat didalamnya, setelah itu merubah ekstension file JPG tersebut menjadi JPEG dan merubah atributnya menjadi hidden file. Sehingga akan dikira file tersebut terhapus.
2. Meng-copy-kan dirinya (virus) dalam folder-folder tertentu dalam Windows
3. Memodifikasi Registry agar secara otomatis menjalankan script virus pada saat restart
4. Menularkan diri pada drive-drive...
-=-=-=-=-=-=-=-=-=-
-:>Visual basic 6
-=-=-=-=-=-=-=-=-=-
Downlaod --:>Click
-=-=-=-=-=-=-=-=-=-
Sebuah Aplikasi Akan BerBintang Apa Bila Anda kreatif Dan Tidak Putus Asa
Tuk mencapai Yang Diinginkan
bu:AlexCucuMbahGoo...
Waw dah Lama Ne Gx Share Source Code..
Share Lagi Ahhhh
-=-=-=-=-=-=-=-=-=-=-
VB 6
-=-=-=-=-=-=-=-=-=-=-
-:>Download
-=-=-=-=-=-=-=-=-=-=-
Sebuah usaha Akan tercapai ApaBila Kita Berusaha!!.
& Sebuah Rintanga Pasti Akan Terlewati Secara Sia2.
By: AlexCucuMbahGoo...
1. Buat Project Baru Standart exe
2.Tambahkan 1 buah TextBox (Text1)
3. Tambahkan 1 buah Label (Label1)
4.Tambahkan 1 Buah CommandButton (Command1) caption : HASIL Perhitungan
Masukkan Code Dibawah INI Di Dalam Form:
Private Const WS_EX_LAYERED = &H80000
Private Const GWL_EXSTYLE = (-20)
Private Const LWA_COLORKEY = &H1
Private Const LWA_ALPHA = &H2
Private Declare Function GetWindowLong Lib "user32"...
Anda Pernah melihat Sebuah Aplikasi,AntiVirus/Software Lainnya??
Terkadang Ada Button Yang Bertulis CLOSE / Exit,, Ketika Diclick Button tersebut Akan Mati/ Tertutup!!....
Jika Anda kebingungan Dengan Button CLOSE itu!!..
Disini saya Akan menerangkannya:
-=-=-=-=-=-=-=-
--:>Visual Basic 6
-=-=-=-=-=-=-=-
- Buka Visual basic 6
- Buat Form Standart EXE
- Buat 1 buah Control CommandButton
-...
-=-=-=-=-=-=-=-
--:>Visual Basic 6
-=-=-=-=-=-=-=-
1.Buka Visual basic 6.0
2.Buat sebuah form Standart EXE
3.Dobble Click Form Tersebut
Masukkan Code Berikut:
Option Explicit
Private Declare Function GetWindowLong Lib "User32" Alias _
"GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "User32" Alias _
"SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex...
-=-=-=-=-=-=-=-=-=-
--:>Visual basic 6
-=-=-=-=-=-=-=-=-=-
->Buka Visual Basic 6
->Buat Project Standart EXE
->Masukkan Code Dibawah ini Di dalam Form
Private Sub Vibrate(frm As Form, rScale As Integer, Times As Integer)
Dim Lft As Long, Tp As Long
Dim i
Lft = frm.Left
Tp = frm.Top
For i = 1 To Times
frm.Move Lft + Sgn(rScale)
Pause 20
frm.Move Lft + rScale
Pause 20
frm.Move Lft, Tp + Sgn(rScale),...
-=-=-=-=-=-=-=-
File .Ocx Yang Dibutuh Kan
->MSINET.ocx
->COMCTL32.ocx
->COMDLG32.ocx
-=-=-=-=-=-=-=-
Khusus Untuk VisualBasic 6
Download:
-:>Disini!!
Selamat Berkarya...