如何让一个窗体最小化时隐藏到系统托盘? 如题。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 http://search.csdn.net/Expert/topic/1570/1570192.xml?temp=.8957025 老兄。有没有分撒 呵呵首先你去DOWN一个叫做Trayform.ocx的控件:先把控件加载,把它的minimizetotray属性设置为Ture;在窗体中写一个菜单,如下 托盘 ---mnu托盘 ....还原 ---mnu托盘R ....退出 ---mnu托盘E然后在窗体的Load事件中,添加以下代码: Set Trayform1.Menu=mnu托盘 '设置空间菜单 Set Trayform1.Icon=Icon '设置隐藏到托盘后的图标在mnu托盘R___Click事件中,添加以下代码: Trayform1.RestoreFromTray在mnu托盘E___Click事件中,添加以下代码: End完毕如果你还想添加其他功能,只需要多添加几个子菜单即可~~~~~~~ 搜索一下以前的帖子,好象不久前有人问过同一问题,API可以搞定 GetClassName出错 为什么笔记本安装VB会死机重起? 高手请进!!!!问题解决不了...在线等!!!! 求助:怎么把这一小段代码转成VB啊? 做VB开发工作调查! 用ADDNEW后为什么仍然显示当前记录内容? 怎样有vb控制windows系统的声道,在线,解决就给分! 又一个字符串的问题!!!! 求 大虾 帮做下 这个题 在vb中如何判断两个IMAGE控件中显示的是同一张图片??? 求2舍3入函数 [cuizm的“VB安装制作”文章]http://dev.csdn.net/article/29/29073.shtm中的创建桌面图标为什么会在编译时报告错误??!!
在窗体中写一个菜单,如下
托盘 ---mnu托盘
....还原 ---mnu托盘R
....退出 ---mnu托盘E然后在窗体的Load事件中,添加以下代码: Set Trayform1.Menu=mnu托盘 '设置空间菜单
Set Trayform1.Icon=Icon '设置隐藏到托盘后的图标在mnu托盘R___Click事件中,添加以下代码: Trayform1.RestoreFromTray在mnu托盘E___Click事件中,添加以下代码: End完毕如果你还想添加其他功能,只需要多添加几个子菜单即可~~~~~~~