VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
查看: 2812|回复: 4

[经验技巧] 在任务管理器中隐藏自己

[复制链接]
 楼主| 发表于 2010-3-24 08:38:49 | 显示全部楼层 |阅读模式
本帖最后由 djrm_yb 于 2010-3-24 08:40 编辑

Private Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Const GW_OWNER = 4
Private Const GW_HWNDLAST = 1
Private Const SW_HIDE = 0
Private Sub Form_Load()
    Dim lphWnd As Long
    lphWnd = GetWindow(Me.hwnd, GW_OWNER)
    'lphWnd = GetWindow(Me.hwnd, GW_HWNDLAST) '这样将隐藏桌面图标
    ShowWindow lphWnd, SW_HIDE
End Sub


呵呵,不要抱太高的期望,只是在任务管理器的“应用程序”中隐藏而已,在“进程”中仍然会显示出来的。。。。
发表于 2010-3-24 08:59:31 | 显示全部楼层
app.taskvisible=false 就行了
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-3-25 11:55:14 | 显示全部楼层
呵呵这样是没错,,不过我那个改改能干点别的。(见注释掉了的那一句)
回复 支持 反对

使用道具 举报

发表于 2010-3-25 15:43:15 | 显示全部楼层
注释看不懂,
隐藏桌面图标是 什么意思?桌面上的回收站消失?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-3-25 16:26:11 | 显示全部楼层
4# download
你运行一下不就得了,,也没什么危害,关掉程序后就正常了
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2022-7-4 22:59

VB爱好者乐园(VBGood)
快速回复 返回顶部 返回列表