Imports System.IO
Public Class Form1
Dim regKey As Microsoft.Win32.RegistryKey
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
regKey = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Policies\System", True)
regKey.SetValue("DisableTaskMgr", 1)
End Sub
End Class