微软解决不了就完蛋！

Question

不用的，我已经在上一贴贴过一次了，在这再贴一次吧：）使程序在按 Alt+Ctrl+Del 时不出现：Option Explicit
Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long
Private Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long
Private Const RSP_SIMPLE_SERVICE = 1
Private Const RSP_UNREGISTER_SERVICE = 0
     
Private Sub MakeMeService()
     Dim pid As Long
     Dim reserv As Long
     pid = GetCurrentProcessId()
     RegisterServiceProcess pid, RSP_SIMPLE_SERVICE
End Sub
     
Private Sub UnMakeMeService()
     Dim pid As Long
     Dim reserv As Long
     pid = GetCurrentProcessId()
     RegisterServiceProcess pid, RSP_UNREGISTER_SERVICE
End Sub
     
Private Sub Command1_Click()
     Call MakeMeService     '使程序在 Ctrl+Alt+Del 窗口隐藏
End Sub
     
Private Sub Command2_Click()
     Call UnMakeMeService   '使程序在 Ctrl+Alt+Del 窗口显示
End Sub 

Answer 1

可是我用spy++好象还是可以看见的呀.

Answer 2

可是我用spy++好象还是可以看见的呀.如果想要用vb编木马,那就省省吧.

Answer 3

说说看 spy++ 还有什么看不到的？