有没有办法能实现自动隐藏指定程序的任务栏图标显示~

来源：百度知道 编辑：UC知道 时间：2024/06/25 21:13:38
RT
不是系统托盘区的图标
如图红色圈中区域=.=谢谢~~~~其实我是因为装了一个 钢炼的桌面怀表~但它一直占用任务栏，觉得浪费空间，但又喜欢让它停留桌面上，所以=.=
再次 谢谢
希望有方法~~~~~
2L大哥能说详细些么？能直接给出编译好的VB代码，我追加50分~谢谢~我不懂编程的=.=

很简单。写个小程序就搞定了。API用FINDWINDOw

窗体上放一个TIMER计时器。interval设置为1000
放两个按钮，一个显示，一个隐藏

以查找记事本为例子。打开一个记事本，上面的标题为"无标题 - 记事本" 我们通过FINDWINDOW来查找这个窗口的句柄。放在TIMER里执行。如果你想更改别的窗体是否显示。可以 把"无标题 - 记事本" 替换成你想隐藏或显示的窗体标题 。如”计算器“ 如：“Baidu Hi"等等

复制下面的代码到你的窗体里。就可以看到效果了。。

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Dim h As Long

Private Sub Command1_Click()
If h > 0 Then
ShowWindow h, 0
End If

End Sub

Private Sub Command2_Click()
If h > 0 Then
ShowWindow h, 1
End If
End Sub

Private Sub Form_Load()

End Sub

Private Sub Timer1_Timer()
h = FindWindow(vbNullString, "无标题 - 记事本&quo