网站首页 > 文章中心 > 其它

vb.net制作图标

作者:小编 更新时间:2023-08-22 14:06:27 浏览量:470人看过

vb.net 如何制作图标按钮 ?急急急!!在线等!

窗口边框(FormBorderStyle)设为None,窗口(WindowState)设为Maximized,如果想让窗口背景透明,将窗口背景颜色和TransparencyKey设为同一种颜色,按钮用Label(标签)代替,背景设为Transparent,边框设为None,文字位置一般是下中,Label控件支持无边框.

动感效果在鼠标事件(MouseDown按下,MouseUp抬起,MouseEnter进入,MouseLeave离开)更换指定的图片;

添加timer控件还可以使用动画

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Me.Label1.Refresh()

vb.net制作图标-图1

End Sub

快捷键用热键

RegisterHotKey

函数功能:该函数定义一个系统范围的热键.

函数原型:BOOL RegisterHotKey(HWND hWnd,intid,UINT fsModifiers,UINT vk);

参数:

hWnd:接收热键产生WM_HOTKEY消息的窗口句柄.若该参数NULL,传递给调用线程的WM_HOTKEY消息必须在消息循环中中进行处理.

id:定义热键的标识符.调用线程中的其他热键不能使用同样的标识符.应用功能程序必须定义一个0X0000-0xBFFF范围的值.一个共享的动态链接库(DLL)必须定义一个0xC000-0xFFFF范围的值伯GlobalAddAtom函数返回该范围).为了避免与其他动态链接库定义的热键冲突,一个DLL必须使用GlobalAddAtom函数获得热键的标识符.

vb.net制作图标-图2

fsModifoers:定义为了产生WM_HOTKEY消息而必须与由nVirtKey参数定义的键一起按下的键.该参数可以是如下值的组合:

MOD_ALT:按下的可以是任一Alt键.MOD_CONTROL:按下的可以是任一Ctrl键.

MOD_SHIFT:按下的可以是任一Shift键.

MOD_WIN:按下的可以是任一Windows按键.

vk:定义热键的虚拟键码.

返回值:若函数调用成功,返回一个非O值.若函数调用失败,则返回值为0.若要获得更多的错误信息,可以调用GetLastError函数.

备注:当某键被接下时,系统在所有的热键中寻找匹配者.一旦找到一个匹配的热键,系统将把WM_HOTKEY消息传递给登记了该热键的线程的消息队列.该消息被传送到队列头部,所以呢它将在下一轮消息循环中被移去.该函数不能将热键同其他线程创建的窗口关联起来.

若为一热键定义的击键己被其他热键所定义,则RegisterHotKey函数调用失败.

若hWnd参数标识的窗口已用与id参数定义的相同的标识符登记了一个热键,则参数fsModifiers和vk的新值将替代这些参数先前定义的值.

若设置MOD_KEYUP位,则当发生键被按下或被弹起的事件时,窗口将发送WM_HOTKEY消息.

RegisterHotKey可以被用来在线程之间登记热键.

UnregisterHotKey

函数功能:该函数释放调用线程先前登记的热键.

函数原型:BOOL UnregisterHotKey(HWND hWnd,int id);

hWnd:与被释放的热键相关的窗口句柄.若热键不与窗口相关,则该参数为NULL.

id:定义被释放的热键的标识符.

返回值:若函数调用成功,返回值不为0.若函数调用失败,返回值为0.若要获得更多的错误信息,可以调用GetLastError函数.

①.、首先定义所需要用到的常量

如图所示,在窗体代码后定义常量和API函数

代码如下:

Public Const MOD_ALT As Integer = H1

下面过程是注册Ctrl+T的组合键为组合键,假如注册成功,则返回true,反之注册失败则返回false,我们可以根据返回的结果判断并提醒用户注册的情况.

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim isResult As Boolean

isResult=RegisterHotKey(Handle, 0, MOD_CONTROL, Asc("T")) '注册Ctrl+T的组合键

If isResult = False Then

MsgBox("注册热键Ctrl+T失败")

End If

[apge]

下面过程为重载WndProc过程,响应热键并处理热键,这里是用来隐藏和显示程序主界面.

Protected Overrides Sub WndProc(ByRef m As Message)

If m.Msg = WM_HOTKEY Then

MyBase.WndProc(m)

最后在关闭窗体的时候释放占用的热键,如果前面注册失败的话,则会出现释放失败的结果.

Private Sub Form1_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed

isResult=UnRegisterHotKey(Handle, 0)

双击打开指定的程序

Private Sub Label1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.DoubleClick

System.Diagnostics.Process.Start("路径")打开指定程序

先列出这些吧

vb.net界面设计 的工具栏里的一些基本图标,比如打开、保存、复制怎么添加啊?

用格式转换器(格式工厂)把ico格式转换成其他可识别的格式

然后在添加

下一步(你的意思是要在界面设计中 往窗体上添加工具栏吗?)

工具箱中 ---- 菜单和工具栏 ----- MenuStrip

右面属性中找到Image属性.可以更改你自己的图片了.

知道了吗?

还有疑问你就追问 ++++赫赫

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

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

vb.net怎样制作安装包

打包过程:

①.、打开自己已经创建好的VB.NET项目(一般一开始创建项目的时候创建的是Windows窗体应用程序).

关于安装后的一些属性的设置:

以上就是土嘎嘎小编为大家整理的vb.net制作图标相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!

版权声明:倡导尊重与保护知识产权。未经许可,任何人不得复制、转载、或以其他方式使用本站《原创》内容,违者将追究其法律责任。本站文章内容,部分图片来源于网络,如有侵权,请联系我们修改或者删除处理。

编辑推荐

热门文章