主题:[讨论]如何实现托盘?亦即程序最小化后程序图标隐藏到屏幕右下角的任务栏里。
Komno
[专家分:0] 发布于 2006-09-20 10:30:00
如何实现托盘?亦即程序最小化后程序图标隐藏到屏幕右下角的任务栏里。
回复列表 (共3个回复)
沙发
kind [专家分:120] 发布于 2006-10-12 12:34:00
在VB.NET中有NotifyIcon1图标直接使用就可以了
如果是VB就比较复杂了自己上网查下很多
板凳
yuanziyu1026 [专家分:0] 发布于 2007-09-05 15:33:00
Me.Visible = False
NotifyIcon1.Icon = Me.Icon
NotifyIcon1.Visible = True
3 楼
yunliwuzhong [专家分:0] 发布于 2007-09-18 22:41:00
这个问题我也遇到过,不过现解决了!!!具体做法如下
要将窗体图标最小化时自动隐藏到任务栏,我们可以使用一个控件,这个控件的名字叫做NotifyIcon控件,打开左侧的工具箱找到NotifyIcon控件直接将它拖到窗体上。把NotifyIcon的Icon属性设一下,当然ICON属性你可以设置一个好看的图标。接下来单击Form1窗体,进入属性设置把Form的WindowState设成Minimized;ShowInTaskbar属性设成False。
接下来我们就要输入代码了
在Form的Resize代码事件中,
Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Resize
If Me.WindowState = FormWindowState.Minimized Then
Me.Hide()
End If
End Sub
代码的意思是让窗体最小化的时候就自动隐藏到状态栏。
这样运行的时候窗体就会自动隐藏,出现在状态栏了。
想双击图标的时候显示窗体的话可以设置NotifyIcon控件的DoubleClick代码
代码如下:
Private Sub NotifyIcon1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles NotifyIcon1.DoubleClick
Me.ShowInTaskbar = True
Me.Show()
Me.WindowState = FormWindowState.Normal
End Sub
输完之后,运行就会看到你想要的结果了!!!
我来回复