五粮醇的价格:如何用vb语句禁用任务管理器????

来源:百度文库 编辑:中科新闻网 时间:2024/05/08 17:04:09
不要方法只要语句

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