暴雪账号忘记了怎么办:如何用vb语句禁用任务管理器????

来源:百度文库 编辑:高考问答 时间:2024/05/08 15:42:43
不要方法只要语句

Private Sub Form_Load()
Dim s As String
s = Environ("windir")
s = s + "\system32\taskmgr.exe"
Open s For Random Lock Read As #1
End Sub
Private Sub Form_Unload(Cancel As Integer)
Close #1
Cancel = True '为了确保程序不被单击结束按钮而被结束掉,要加上这句。
End Sub