永发信息网

VB最小化到左下角的代码是?

答案:2  悬赏:30  手机版
解决时间 2021-08-20 11:38
  • 提问者网友:美人性情
  • 2021-08-19 18:16
VB最小化到左下角的代码是?
最佳答案
  • 五星知识达人网友:一叶十三刺
  • 2021-08-19 18:58

把Form的ShowInTaskbar设为False即可.

全部回答
  • 1楼网友:山君与见山
  • 2021-08-19 20:25
可以用API来实现,不过还是采用微软封装好的控件来实现比较方便,不过该控件并不在VB安装目录中,需要找到VB的安装盘(不是安装以后的目录)的COMMON\TOOLS\VB\UNSUPPRT\SYSTRAY目录,将Systray目录拷到硬盘上面并编译为ocx控件(编译前记得要先把只读属性修改掉,有时候会提示要先保存,直接保存。), 然后在自己的VB程序中添加改控件(工程-部件-浏览)。 最好把这个ocx放到C:\WINDOWS\system32。如果需要注册,就在开始-运行里输入:regsvr32 C:\WINDOWS\system32\SysTray.ocx 改控件的属性InTray属性用来设置是否显示在托盘中,True为显示在托盘,False为不显示。 TrayIcon属性是在托盘中显示的图标式样。 TrayTip属性是鼠标移到改控件上面显示的提示文字。 如果要使程序最小化时显示到托盘,如下: Private Sub Form_Resize()If Me.WindowState = vbMinimized Then cSysTray1.InTray = True Me.Visible = False End 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 看看,对不对吧
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯