偶然间发现,机器上的反病毒软件仅仅出现在"任务管理器-进程"里,在"任务管理器-程序"里却没有.这是怎么做到的?

解决方案 »

  1.   

    BTW,不要求在"任务管理器-进程"隐藏,只在"任务管理器-程序"就行
      

  2.   

    有方法如下,只是在任务管理器-程序里面隐藏。此代码放在模块
    Public Const SW_HIDE = 0
    Public Const GW_OWNER = 4
    Declare Function GetWindow Lib "user32" (ByVal hwnd As _
    Long, ByVal wCmd As Long) As Long
    Declare Function ShowWindow Lib "user32" (ByVal hwnd _
    As Long, ByVal nCmdShow As Long) As Long
    此代码放在窗体
    Private Sub Form_Load()
       Dim rc As Long
       Dim OwnerhWnd As Long
       OwnerhWnd = GetWindow(Me.hwnd, GW_OWNER)
       rc = ShowWindow(OwnerhWnd, SW_HIDE)
    End Sub
      

  3.   

    Option ExplicitPrivate Sub Form_Load()
    App.TaskVisible = False
    End Sub
      

  4.   

    Option ExplicitPrivate Sub Form_Load()
        App.TaskVisible = False
    End Sub