vb.net

位置:IT落伍者 >> vb.net >> 浏览文章

用VB.NET轻松制作特效窗体


发布日期:2021年11月17日
 
用VB.NET轻松制作特效窗体
体是Windows应用程序的基础新一代的开发工具Visual BasicNet为设计制作窗体提供了更多简单而丰富的方法无需再求助于复杂而易错的API函数我们就可以轻松制作多种特效窗体

轻松制作透明窗体

VBNET可以轻松制作出任一透明度的窗体我们只要在窗体的属性窗口中将 Opacity 属性设置为一个介于 (完全透明)与 (完全不透明)之间的值就可以了

Dim frm As FrmTrans = New FrmTrans()

frmOpacity =

frmShowDialog()

轻松制作始终位于最上层的窗体

在VB要制作一个始终位于最上层的窗体我们只能求助于令人头痛的API函数然而在 NET 中我们只要简单设置窗体的 TopMost 属性就可实现同样效果了!例如

Dim frm As frmTopMost = New frmTopMost()

frmTopMost = True

frmShow()

轻松制作不可见的窗体

如果要编写一个不让别人发现的隐藏程序制作不可见的窗体就是必须实现的第一步窗体的可见性通常由 Visible 属性控制但是如果希望 Windows 应用程序的主窗体在应用程序启动时不可见您将会发现将它的 Visible 属性设置为 False 的方法无效窗体总会自己显示出来(这是因为启动窗体的生存期决定了应用程序的生存期)虽然如此我们还是可以通过简单将应用程序的启动设置为一个模块从而从窗体的生存期分出应用程序的生存期轻松实现不可见的窗体在下面这个例子中窗体在特定的时间内自动隐藏

)在 Visual Basic 中右击项目并选择添加模块以将模块添加到 Windows 应用程序

)在已添加的模块(或类)内创建可作为项目启动对象的 Main 函数

Sub main()

Dim f As New Form()

fVisible = False

While Hour(DateNow) < 如果当前时间早于窗体自动隐藏

ApplicationDoEvents()

End While

fShowDialog()

End Sub

轻松编写托盘程序

托盘程序作为一类特殊的窗体其快捷图标显示在系统托盘中窗体本身则隐藏不可见NET之前版本的VB中编写托盘程序是十分困难的但是VBNET提供的新的NotifyIcon组件却使VB初学者也能轻松编写一个这样的程序

新建Windows应用程序设置主窗体Opacity属性为FormBorderStyle属性为NoneShowInTaskbar属性为False这样窗体将在启动后隐藏在窗体上放置一个NotifyIcon组件NotifyIcon一个ContextMenu(弹出菜单)组件ContextMenu并根据需要为ContextMenu添加菜单项

设置NotifyIcon的ICON属性这个图标就是应用程序出现在系统托盘中的快捷图标设置NotifyIcon的Text属性为VBNET托盘程序这就是鼠标移动到托盘图标时弹出的文字说明设置NotifyIcon的ContextMenu属性为ContextMenu也就是右键单击快捷图标时的弹出菜单为ContextMenuOK按F运行!

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

上一篇:VB.NET中让Textbox只能输入数字

下一篇:vb.net实现sqlite数据库编程示例