vb点虐 使窗体最小化的简单介绍

如何把VB.NET程序最小化到托盘图标区

VB.NET编写托盘程序

龙门网站建设公司创新互联,龙门网站设计制作,有大型网站制作公司丰富经验。已为龙门上千余家提供企业网站建设服务。企业网站搭建\外贸网站制作要多少钱,请找那个售后服务好的龙门做网站的公司定做!

托盘程序作为一类特殊的窗体,其快捷图标显示在

系统托盘

中,窗体本身则隐藏不可见。在.NET之前版本的VB中编写托盘程序是十分困难的,但是VB.NET提供的新的NotifyIcon组件却使VB初学者也能轻松编写一个这样的程序:

新建“Windows应用程序”,设置主窗体Opacity属性为0,FormBorderStyle属性为None,ShowInTaskbar属性为

False,这样窗体将在启动后隐藏。在窗体上放置一个NotifyIcon组件NotifyIcon1,一个ContextMenu(弹出菜单)组件

ContextMenu1,并根据需要为ContextMenu1添加菜单项。

设置NotifyIcon1的ICON属性,这个图标就是应用程序出现在系统托盘中的快捷图标;设置NotifyIcon1的Text属性为“VB.NET托盘程序”,这就是鼠标移动到托盘图标时弹出的文字说明;设置NotifyIcon1的ContextMenu属性为ContextMenu1,也就是右键单击快捷图标时的弹出菜单为

ContextMenu1。OK,按F5运行!

几乎不用编写代码,一个托盘程序就这样轻松实现了。

VB点虐 如何实现点击关闭按钮时最小化到

1.降窗体的WindowState 属性 设置为 Mininmized;将ShowInTaskbar属性设置为False

2.在窗体的Load事件中添加下面的代码

if Me.WindowState = FormWindowState.Minimized then

me.hide()

end if

VB,要使窗体最小化,需用什么代码

窗体最小化代码:

Private Sub Command1_Click()

Me.WindowState = 1

End Sub

窗体最大化代码:

Private Sub Command2_Click()

Me.WindowState = 2

End Sub

下列代码用一个按钮完成窗体的最大化或正常设置:

Option Explicit

Dim cmdFlag As Boolean

Private Sub Command1_Click()

If cmdFlag = True Then

Me.WindowState = 0

Command1.Caption = "最大化"

Else

Me.WindowState = 2

Command1.Caption = "正常"

End If

cmdFlag = Not cmdFlag

End Sub

vb 如何让其它程序最大化,最小化,关闭

vb窗体的属性栏:

maxbutton

设置成false将隐藏最大化按钮,true为显示.

minbutton设置成false将隐藏最小化按钮,true为显示.

但是用鼠标放在窗体边上,会出现左右箭头,仍然可以

用鼠标改变窗体的大小,,

如果你想彻底锁定窗体,可在窗体属性栏里的borderstyle属性设置为1


网页标题:vb点虐 使窗体最小化的简单介绍
链接分享:http://myzitong.com/article/ddsishg.html