单击“最小化”按钮(标题栏的右边)将窗口缩小为任务栏上右边的图标,同时隐藏原窗体。单击或者右键托盘化的图标,可以重现原窗体。 vb中有部分api可以实现将窗体最小化的功能,但是非常繁琐。这里有一个非常简单的办法:可以用微软封装好的控件来实现,不过该控件并不在VB安装目录中,需要找到VB的安装盘(不是安装以后的目录)的COMMON\TOOLS\VB\UNSUPPRT\SYSTRAY目录,将Systray目录拷到硬盘上面并编译为ocx控件(编译前记得要先把只读属性修改掉,有时候会提示要先保存,直接保存。), 然后在自己的VB程序中添加改控件(工程-部件-浏览)。 最好把这个ocx放到C:\WINDOWS\system32。 改控件的属性InTray属性用来设置是否显示在托盘中,True为显示在托盘,False为不显示。TrayIcon属性是在托盘中显示的图标式样。TrayTip属性是鼠标移到改控件上面显示的提示文字。如果要使程序最小化时显示到托盘,如下: Private Sub Form_Resize() If Me.WindowState = vbMinimized Then cSysTray1.InTray = True Me.Visible = FalseEnd If End Sub 点击托盘图标后让程序显示出来,如下: Private Sub cSysTray1_MouseDown(Button As Integer, Id As Long) Me.WindowState = vbNormal Me.Visible = True cSysTray1.InTray = False Me.SetFocus End Sub