VB Hide Task Manager process - hungvb.com

Public Class Form1

    Dim RegistryKey As Object

    Private Sub buttonEnable_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles buttonEnable.Click

        RegistryKey = CreateObject("WScript.Shell")
        RegistryKey.regwrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr", 0, "REG_DWORD")

    End Sub

    Private Sub buttonDisable_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles buttonDisable.Click

        RegistryKey = CreateObject("WScript.Shell")
        RegistryKey.regwrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr", 1, "REG_DWORD")

    End Sub

End Class