我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net的图标 vb控件图标

vb.net 获得电脑图标

vb.net安装后自带非常多的图标,我的是vb2008,其路径为:C:\Program Files\Microsoft Visual Studio 9.0\Common7\VS2008ImageLibrary\2052\VS2008ImageLibrary

创新互联公司是一家专注于成都做网站、网站制作与策划设计,龙港网站建设哪家好?创新互联公司做网站,专注于网站建设十年,网设计领域的专业建站公司;建站业务涵盖:龙港等地区。龙港做网站价格咨询:18980820575

自己解压VS2008ImageLibrary后就能看到大量的常用图标

VB.NET 窗体图标和任务栏图标设置问题

任务栏图标就是窗体的ICON属性设置的图标,和标题栏的图标是完全一样的。如果你想做的不一样,那就用无边框窗体,自制一个标题栏

如何把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.net怎样获取应用程序的图标

''' summary

''' Returns an icon for a given file - indicated by the name parameter.

''' /summary

''' param name="name"Pathname for file./param

''' param name="size"Large or small/param

''' param name="linkOverlay"Whether to include the link icon/param

''' returnsSystem.Drawing.Icon/returns

Public Shared Function GetFileIcon(ByVal name As String, ByVal size As IconSize, ByVal linkOverlay As Boolean) As System.Drawing.Icon

Dim shfi As New Shell32.SHFILEINFO()

Dim flags As UInteger = Shell32.SHGFI_ICON Or Shell32.SHGFI_USEFILEATTRIBUTES

If True = linkOverlay Then

flags += Shell32.SHGFI_LINKOVERLAY

End If

' Check the size specified for return.

If IconSize.Small = size Then

flags += Shell32.SHGFI_SMALLICON

Else

flags += Shell32.SHGFI_LARGEICON

End If

Shell32.SHGetFileInfo(name, Shell32.FILE_ATTRIBUTE_NORMAL, shfi, CInt(System.Runtime.InteropServices.Marshal.SizeOf(shfi)), flags)

' Copy (clone) the returned icon to a new object, thus allowing us to clean-up properly

Dim icon As System.Drawing.Icon = DirectCast(System.Drawing.Icon.FromHandle(shfi.hIcon).Clone(), System.Drawing.Icon)

User32.DestroyIcon(shfi.hIcon)

' Cleanup

Return icon

end function


本文标题:vb.net的图标 vb控件图标
本文路径:http://mswzjz.cn/article/dospcoo.html

其他资讯