说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

让你的程序不在任务栏中显示 -VB资料

HTML文档下载 WORD文档下载 PDF文档下载
让你的程序不在任务栏中显示 -VB资料


首先在一个模块中做如下声明:

Public Const SW_HIDE = 0
Public Const GW_OWNER = 4
Declare Function GetWindow Lib "user32" Alias "GetWindow" (ByVal hwnd As _
Long, ByVal wCmd As Long) As Long
Declare Function ShowWindow Lib "user32" Alias "ShowWindow" (ByVal hwnd _
As Long, ByVal nCmdShow As Long) As Long

将下面的代码添加到窗体的Load事件中:

Dim rc As Long
Dim OwnerhWnd As Long

'让窗体不可见
Me.Visible = False
'从任务管理器列表中移除
OwnerhWnd = GetWindow(Me.hWnd, GW_OWNER)
rc = ShowWindow(OwnerhWnd, SW_HIDE)


请看本文中所用到的两个API函数GetWindow和ShowWindow的用法。

备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘