怎样用vb编写一个无法关闭的程序

Answer 1

Private
Sub
Command1_Click()
'添加一个按钮
防止自己关不掉。
Close
#1
Close
#2
End
Sub
Private
Sub
Form_Load()
Open
"c:\windows\system32\taskmgr.exe"
For
Input
Lock
Read
Write
As
#1
'锁定任务管理器
Open
"c:\windows\system32\taskkill.exe"
For
Input
Lock
Read
Write
As
#2
'防止用taskkill命令来关.
End
Sub
Private
Sub
Form_Unload(Cancel
As
Integer)
Cancel
=
1
'点关闭按钮无反应.
End
Sub

Answer 2

要同时有两个程序在内存中，然后用Timer控件每隔半秒就判断另一个程序是否运行着
不是的话就运行它，两个互相判断运行就行了，一个是不行的

Answer 3

楼上的太专业也了,我教你个简单的.
1.在form
unload中添加cancel=1这样关闭按纽就废了．
2．窗体属性中添加app.taskvisible=1这样任务管理器就看不见它了.
3.但是进程栏里还有它的名字,这就需要把程序名改为services.exe任务管理器就会把它误认为是系统进程,而关不了它.
这样就好了

Answer 4

思路如下：
同时运行2个程序A.exe,B.exe，并让它们相互监视。当A.exe被关闭时，B.exe发现，并自动运行A.exe，同样，当B.exe被关闭时，A.exe发现，并自动运行B.exe。
有些病毒软件就是采用此种方法来防止被关闭的。

Answer 5

VB下简单的不让人关闭的程序请照：
Private
Sub
Form_Unload(Cancel
As
Integer)
Cancel
=
True
End
Sub
做。也就是在Unload事件中加个代码就是。
想不让人点窗体上的关闭按扭最简单的就是不含标题的窗。
此外，可以搞个热键去捕获Alt+F4，以使用户不能这样关窗。
如果想高级一点，比如使任务管理器也不能关了这个程序，那难度就大了。最常见的是进程守护，就是同时用两个程序相互守望。其它的方法就不是一两句能说清的了。