Görev Yöneticisini Kilitlemek (TaskManager)

Imports Microsoft.Win32 'register için Public Class Form1 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Try Dim reg As Microsoft.Win32.RegistryKey Dim subKey As String = "Software\Microsoft\Windows\CurrentVersion\Policies\System" reg = Microsoft.Win32.Registry.CurrentUser.CreateSubKey(subKey) reg.SetValue("DisableTaskMgr", "1") reg.Close() Catch ex As Exception MessageBox.Show(ex.Message) End Try End Sub Private Sub Form1_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing Try Dim reg As Microsoft.Win32.RegistryKey Dim subKey As String = "Software\Microsoft\Windows\CurrentVersion\Policies\System" reg = Microsoft.Win32.Registry.CurrentUser.CreateSubKey(subKey) reg.DeleteValue("DisableTaskMgr") reg.SetValue("DisableTaskMgr", 0) reg.Close() Catch ex As Exception MessageBox.Show(ex.Message) End Try End Sub Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click Dim info As New ProcessStartInfo("taskmgr.exe") Process.Start(info) End Sub End Class

bu Mart 07, 2016 Komentar

Related Posts

Görev Yöneticisini Kilitlemek (TaskManager)

4/ 5

Oleh bu