vb.net 如何制作圖標按鈕 ？急急急！！在線等！

窗口邊框（FormBorderStyle）設為None，窗口（WindowState）設為Maximized，如果想讓窗口背景透明，將窗口背景顏色和TransparencyKey設為同一種顏色，按鈕用Label（標簽）代替，背景設為Transparent，邊框設為None，文字位置一般是下中，Label控件支持無邊框。

成都創(chuàng)新互聯(lián)公司是一家集網(wǎng)站建設,咸陽企業(yè)網(wǎng)站建設,咸陽品牌網(wǎng)站建設,網(wǎng)站定制,咸陽網(wǎng)站建設報價,網(wǎng)絡營銷,網(wǎng)絡優(yōu)化,咸陽網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè)，幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強企業(yè)競爭力。可充分滿足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時我們時刻保持專業(yè)、時尚、前沿，時刻以成就客戶成長自我，堅持不斷學習、思考、沉淀、凈化自己，讓我們?yōu)楦嗟钠髽I(yè)打造出實用型網(wǎng)站。

動感效果在鼠標事件（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()

End Sub

快捷鍵用熱鍵

RegisterHotKey

函數(shù)功能：該函數(shù)定義一個系統(tǒng)范圍的熱鍵。

函數(shù)原型：BOOL RegisterHotKey（HWND hWnd，intid，UINT fsModifiers，UINT vk）；

參數(shù)：

hWnd：接收熱鍵產(chǎn)生WM_HOTKEY消息的窗口句柄。若該參數(shù)NULL，傳遞給調用線程的WM_HOTKEY消息必須在消息循環(huán)中中進行處理。

id：定義熱鍵的標識符。調用線程中的其他熱鍵不能使用同樣的標識符。應用功能程序必須定義一個0X0000-0xBFFF范圍的值。一個共享的動態(tài)鏈接庫（DLL）必須定義一個0xC000-0xFFFF范圍的值伯GlobalAddAtom函數(shù)返回該范圍）。為了避免與其他動態(tài)鏈接庫定義的熱鍵沖突，一個DLL必須使用GlobalAddAtom函數(shù)獲得熱鍵的標識符。

fsModifoers：定義為了產(chǎn)生WM_HOTKEY消息而必須與由nVirtKey參數(shù)定義的鍵一起按下的鍵。該參數(shù)可以是如下值的組合：

MOD_ALT：按下的可以是任一Alt鍵。MOD_CONTROL：按下的可以是任一Ctrl鍵。

MOD_SHIFT：按下的可以是任一Shift鍵。

MOD_WIN：按下的可以是任一Windows按鍵。

vk：定義熱鍵的虛擬鍵碼。

返回值：若函數(shù)調用成功，返回一個非O值。若函數(shù)調用失敗，則返回值為0。若要獲得更多的錯誤信息，可以調用GetLastError函數(shù)。

備注：當某鍵被接下時，系統(tǒng)在所有的熱鍵中尋找匹配者。一旦找到一個匹配的熱鍵，系統(tǒng)將把WM_HOTKEY消息傳遞給登記了該熱鍵的線程的消息隊列。該消息被傳送到隊列頭部，因此它將在下一輪消息循環(huán)中被移去。該函數(shù)不能將熱鍵同其他線程創(chuàng)建的窗口關聯(lián)起來。

若為一熱鍵定義的擊鍵己被其他熱鍵所定義，則RegisterHotKey函數(shù)調用失敗。

若hWnd參數(shù)標識的窗口已用與id參數(shù)定義的相同的標識符登記了一個熱鍵，則參數(shù)fsModifiers和vk的新值將替代這些參數(shù)先前定義的值。

若設置MOD_KEYUP位，則當發(fā)生鍵被按下或被彈起的事件時，窗口將發(fā)送WM_HOTKEY消息。

RegisterHotKey可以被用來在線程之間登記熱鍵。

UnregisterHotKey

函數(shù)功能：該函數(shù)釋放調用線程先前登記的熱鍵。

函數(shù)原型：BOOL UnregisterHotKey（HWND hWnd，int id）；

參數(shù)：

hWnd：與被釋放的熱鍵相關的窗口句柄。若熱鍵不與窗口相關，則該參數(shù)為NULL。

id：定義被釋放的熱鍵的標識符。

返回值：若函數(shù)調用成功，返回值不為0。若函數(shù)調用失敗，返回值為0。若要獲得更多的錯誤信息，可以調用GetLastError函數(shù)。

1、首先定義所需要用到的常量

如圖所示，在窗體代碼后定義常量和API函數(shù)

代碼如下：

Public Const WM_HOTKEY As Integer = H312

Public Const MOD_ALT As Integer = H1

Public Const MOD_CONTROL As Integer = H2

Public Const MOD_SHIFT As Integer = H4

Public Const GWL_WNDPROC As Integer = (-4)

Public Declare Auto Function RegisterHotKey Lib "user32.dll" Alias "RegisterHotKey" (ByVal hwnd As IntPtr, ByVal id As Integer, ByVal fsModifiers As Integer, ByVal vk As Integer) As Boolean

Public Declare Auto Function UnRegisterHotKey Lib "user32.dll" Alias "UnregisterHotKey" (ByVal hwnd As IntPtr, ByVal id As Integer) As Boolean

下面過程是注冊Ctrl+T的組合鍵為組合鍵，假如注冊成功，則返回true，反之注冊失敗則返回false，我們可以根據(jù)返回的結果判斷并提醒用戶注冊的情況。

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

End Sub

[apge]

下面過程為重載WndProc過程，響應熱鍵并處理熱鍵，這里是用來隱藏和顯示程序主界面。

Protected Overrides Sub WndProc(ByRef m As Message)

If m.Msg = WM_HOTKEY Then

System.Diagnostics.Process.Start("C:\WINDOWS\system32\freecell.exe")'運行當空接龍游戲

End If

MyBase.WndProc(m)

End Sub

最后在關閉窗體的時候釋放占用的熱鍵，如果前面注冊失敗的話，則會出現(xiàn)釋放失敗的結果。

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

Dim isResult As Boolean

isResult=UnRegisterHotKey(Handle, 0)

End Sub

雙擊打開指定的程序

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

System.Diagnostics.Process.Start("C:\WINDOWS\system32\freecell.exe")

End Sub

System.Diagnostics.Process.Start("路徑")打開指定程序

先列出這些吧

vb.net怎樣制作安裝包

打包過程：

1、打開自己已經(jīng)創(chuàng)建好的VB.NET項目（一般一開始創(chuàng)建項目的時候創(chuàng)建的是Windows窗體應用程序）。

2、點“文件”--“新建項目”--“其他項目類型”--“安裝部署”--“Visual Studio Installer”--“安裝項目”，輸入項目名稱（此處命名為setup1）并點擊“確定”。

3、執(zhí)行完上一步，在解決方案下面會出現(xiàn)setup1項目。右擊setup1項目--“添加”--“項目輸出”。

4、在“添加項目輸出組”中，選擇“主輸出”，然后單擊“確定”。將自動添加所有依賴項。

5、在解決方案資源管理器中，右擊安裝項目---“添加”---“合并模塊”。? 把相關模塊添加進來。

6、在文件系統(tǒng)選項卡中添加所需的應用程序圖標等文件，并生成應用程序的桌面快捷方式，在快捷方式上右鍵選擇屬性，并在屬性欄中的圖標處選擇應用程序快捷方式圖標。（要在用戶桌面和用戶的“程序”菜單屬性里將AlwaysCreate屬性的值修改為True）。這樣安裝完程序后就可以看到桌面的圖標了

7、關于應用程序圖標的詳細說明：

（1）點擊“應用程序文件夾”并在右側的列表中的“主輸出來自。。”上右鍵然后點擊“創(chuàng)建主輸出來自。。的快捷方式”

（2）把生成的快捷方式復制到“用戶桌面”，然后右鍵重命名為你想要在程序安裝后顯示的名字。

（3）重命名完成后在右側的屬性欄中點擊圖標設置為自己想要的圖標，注意，需要先把圖標文件ico加入到“應用程序文件夾”中。（ico的制作：先做好256*256的png文件，然后百度ico制作找到在線制作ico的網(wǎng)站，直接生成ico圖標文件）

關于安裝后的一些屬性的設置：

在vb.net中怎么把Windows應用程序打包成EXE格式的可執(zhí)行文件

1.新建安裝和部署。 打開你所寫的項目，在解決方案上右鍵-添加-新建項目。選擇其他項目類型-安裝和部署-安裝項目。在名稱中把名字改為你所希望的名字，然后確定。 2.確定后打開文件系統(tǒng)，然后單擊應用程序文件夾，在右邊空白處右鍵-添加-項目輸出。3.選擇主輸出，然后確定。 4.在剛添加的主輸出上右鍵，創(chuàng)建其快捷方式。可以重命名也可不重命名。5.剪切剛創(chuàng)建的快捷方式，然后單擊用戶的程序菜單，在其上右鍵，添加，文件夾，重命名文件夾。這個文件夾名字就是你在開始，所有程序中顯示的名字。然后單擊剛創(chuàng)建的文件夾，在右邊空白處粘貼快捷方式，安裝好程序后，這個快捷方式會出現(xiàn)在所有程序中。 6.像上面一樣再創(chuàng)建一個快捷方式，剪切，然后單擊用戶桌面，粘貼。安裝完程序后，這個快捷方式出現(xiàn)在桌面。 7.右擊左邊的"應用程序文件夾"打開屬性對話框:將屬性中的"defaultlocation"的路徑中的"[manufacturer]"去掉,

不然的話做好的安裝程序默認安裝目錄會是"c:\programm file\你的用戶名\安裝解決方案名稱"。 8.右鍵你的安裝項目名，屬性。在打開的屬性頁中,選擇"系統(tǒng)必備",在打開的系統(tǒng)必備頁中,選中如下圖中的選擇項,選上以后,在生成的安裝文件包中包含.netframework組件，然后確定。 9.改變桌面和開始-所有程序中該程序的默認圖標。在應用程序文件夾右邊空白處，右鍵-添加-文件，添加一個ico文件。打開用戶的程序菜單-'你的程序名',在右邊的快捷方式上右鍵，屬性窗口。向其屬性中的icon屬性添加剛添加的ico圖標。同理，打開用戶桌面，在右邊的快捷方式上右鍵，屬性窗口。向其屬性中的icon屬性添加剛添加的ico圖標。 10.添加卸載功能。在應用程序文件夾右邊空白處，右鍵-添加-文件，選擇c:\windows\system32文件夾下的msiexec.exe文件。然后重命名為Uninstall.exe。改不改名字都可以。然后創(chuàng)建快捷方式，剪切到用戶的程序菜單-'你的程序名'。 11.用鼠標左鍵單擊安裝項目名，查看其屬性，注意不是右鍵，屬性。查看其ProductCode屬性。然后復制該屬性的值。如圖： 12.然后打開你創(chuàng)建的那個卸載快捷方式的屬性對話框,在Aguements屬性中輸入"/x {ProductCode}",本例為/x {D8DB4DCF-B28A-49CB-9840-E36D68FD7EE1}。 13.右鍵安裝項目名，單擊生成，即可生成帶有卸載功能的安裝程序了.

當前文章：VB.NET生成ICO,VBNET下載
文章來源：http://vcdvsql.cn/article0/heoioo.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供動態(tài)網(wǎng)站、品牌網(wǎng)站設計、搜索引擎優(yōu)化、全網(wǎng)營銷推廣、域名注冊、品牌網(wǎng)站建設

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉載內(nèi)容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)