Hi

ich bin kein pro (eigentlich totaler noob) aber mitm bissl rumprobieren hab ich rausgefunden,
wie es mit dem button geht aber beim start des progs wie im Quelltest ob funzt das nich

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Reg = CreateObject("Wscript.shell")
Reg.Regwrite( _
"HKEY_CURRENT_USER\Software\Microsoft\Windows\ " & _
"CurrentVersion\Policies\System\DisableTaskMgr ", "1", _
"REG_DWORD")

End Sub