送水后啪啪表情包:VB编程中,如保使程序的运行不在任务管理器中列出?

来源:百度文库 编辑:高考问答 时间:2024/04/30 03:38:24
任务管理器 是指按Alt+Del+Ctrl后出现的窗口.
是指在WinXP下的,VB6.0环璄下的编程

我试过,二楼的答案实现不了,至少在winXP VB6.0中如此

呵呵,最简单的做法就是在form_load里加如以下代码:
Private Sub Form_Load()
App.Title = ""
End Sub
在2000和 xp里就看不到了,还有一个方法就是利用api函数了:
'复制以下代码到一模块中

Declarations

Public Declare Function GetCurrentProcessId Lib "kernel32" () As Long

Public Declare Function GetCurrentProcess Lib "kernel32" () As Long

Public Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long

Public Const RSP_SIMPLE_SERVICE = 1

Public Const RSP_UNREGISTER_SERVICE = 0

'下面代码为隐藏

Public Sub MakeMeService()

Dim pid As Long

Dim reserv As Long

pid = GetCurrentProcessId()

regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)

End Sub

'恢复隐藏

Public UnMakeMeService()

Dim pid As Long

Dim reserv As Long

pid = GetCurrentProcessId()

regserv = RegisterServiceProcess(pid, RSP_UNREGISTER_SERVICE)

End Sub

如果时在”应用程序“ 选项里不显示,那很简单,但要在”进程“那里也不现实就很难了。 只能通过内核级程序HOOk任务管理器的查找调用了,要通过驱动程序还实现,在一本叫什么软件安全的书上看见过。
其他的实现还有做成dll文件远程注入了。

关注