VB實作停用工作管理員的方法

在Windows XP下停用Ctrl-Alt-Delete的方法比較簡單，因為Ctrl-Alt-Delete組合鍵的功能就是呼叫工作管理員，直接把工作管理員給停用了，Ctrl-Alt-Delete的功能也就沒有了，相當於也給了禁用。這個方法的簡單的實作是用二進位stream 形式先開啟C:/windows/system32/taskmgr.exe任務管理器程序，使後續無法手動正常開啟任務管理器。程式碼如下：

複製代碼代碼如下:

Open "C:/WINDOWS/system32/taskmgr.exe" For Binary As #1

這種方法在XP上是可行的，但是在VISTA和WIN7上是無效的。我的解決方法是用taskkill指令來結束任務管理器程式taskmgr.exe。程式碼如下：

複製程式碼如下:Shell ("cmd /c taskkill /f /im taskmgr.exe"), vbHide

在VB程式裡實現的話，最好把上述語句放到Timer事件中，每隔一段時間執行一次，就能實現禁用任務管理器的目的了。程式碼如下：

 Private Sub Timer1_timer()Shell ("cmd /c taskkill /f /im taskmgr.exe"), vbHideEnd Sub

以上所述就是本文的全部內容了，希望大家能夠喜歡。