kod|acil

Programın başlangıçta çalışması için
Imports Microsoft.Win32
bunu kod satırının en üst kısmına ekle
form load a ;
Dim regKey As RegistryKey = Registry.LocalMachine.OpenSubKey("Software\\Micros oft\\Windows\\CurrentVersion\\Run\\", True)
regKey.SetValue("Program Adı", "Program yolu Örneğin c:\programim")
regKey.Close()

Açıklama : program adı önemli değildir fakat program yolu çok önemlidir
sürekli o yoldaki exeyi çağıracaksınız program yüklenebilir ve değiştirilebilir olacağından en sağlıklı şekilde olması için program yoluna
application.startuppath & "\program.exe"
Örnek satır :
regKey.SetValue("Deneme", Application.Startuppath & "\programadı.exe")
şeklinde yaparsanız başlangıç yolu ve exeniz her zaman doğru olur.
form loada me.hide yapmayı unutmayın.

f12 Basınca programın görünür olması:

public class form1 den hemen sonra
Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As System.Windows.Forms.Keys) As Short

bu kodu ekleyin
daha sonra foruma bir tane timer ekleyin interval değerini 1 enabled = true yapın

kod kısmına ise
If GetAsyncKeyState(Keys.f12) Then
me.show
timer1.stop
end if

bu kodu eklediğinizde klavyeden f12 tuşu beklenecek basıldığında ise form görünür olacak ve timer duracaktır.eksik yazma -CrawlinqTR-

diğer kodlar

Pc Açılınca Programın Çalışması ;
Kod:
Forma CheckBox Ekleyin.
Kodları Formun Kod Penceresine Yazın...
Private Sub Check1_Click()
Dim KayitDefteri As Object
Set KayitDefteri = CreateObject("wscript.shell")
If Check1.Value = 0 Then
KayitDefteri.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS \CUR RENTVERSION\RUN\" & App.EXEName, "" & "" & "" & ""
End If
If Check1.Value = 1 Then
KayitDefteri.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS \CUR RENTVERSION\RUN\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
End If
End Sub

Arkadaşlar diger kodlar yokmuydu engelleyiciler

Bluekinged' Alıntı:

Arkadaşlar diger kodlar yokmuydu engelleyiciler

Genişletmek için tıkla ...

Görev Yöneticisi Engelleme Kodu Vb 6.0

Dim reg As RegistryKey
Dim subKey As String = "Software\Microsoft\Windows\CurrentVersion\Policies\System"
reg = Registry.CurrentUser.CreateSubKey(subKey)
reg.SetValue("DisableTaskMgr", "1")
reg.Close()

kendi yaptığım sitelerin ıplerini ve diğer bilgilerini bulan ultra güçlü bir program

CrowLy sağol kodlar için
hack editör v2.0'ın vip kodunu sana mesaj olarak göndereceğim
peki cmd kodu felan bunları bana hepsini sıralı olarak yollasan

sağolun benimde işime yaradı

aynen