測(cè)試了一下,在我的VS2013中的VB中做一個(gè)windows常規(guī)應(yīng)用,生成的.exe文件的圖標(biāo)是正常的,透明的。

創(chuàng)新互聯(lián)建站服務(wù)項(xiàng)目包括遼寧網(wǎng)站建設(shè)、遼寧網(wǎng)站制作、遼寧網(wǎng)頁(yè)制作以及遼寧網(wǎng)絡(luò)營(yíng)銷(xiāo)策劃等。多年來(lái),我們專(zhuān)注于互聯(lián)網(wǎng)行業(yè),利用自身積累的技術(shù)優(yōu)勢(shì)、行業(yè)經(jīng)驗(yàn)、深度合作伙伴關(guān)系等,向廣大中小型企業(yè)、政府機(jī)構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案,遼寧網(wǎng)站推廣取得了明顯的社會(huì)效益與經(jīng)濟(jì)效益。目前,我們服務(wù)的客戶(hù)以成都為中心已經(jīng)輻射到遼寧省份的部分城市,未來(lái)相信會(huì)繼續(xù)擴(kuò)大服務(wù)區(qū)域并繼續(xù)獲得客戶(hù)的支持與信任!
參見(jiàn)附件。
和IMAGELIST一起使用,用它的INDEX的值來(lái)確定TREEVIEW和LISTVIEW的圖標(biāo)
Public Class Form1
Private Imgfile As String
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
ListBox1.DrawMode = DrawMode.OwnerDrawVariable
Imgfile = "X:\Users\......\Pictures\ssm.png"‘顯示為listbox的每一行文字前面的圖標(biāo)文件,換一張你自己的圖片。
End Sub
Private Sub ListBox1_DrawItem(sender As Object, e As DrawItemEventArgs) Handles ListBox1.DrawItem
e.DrawBackground()
Dim rect As Rectangle = New Rectangle(2, e.Bounds.Y + 2, e.Bounds.Height, e.Bounds.Height - 4)
e.Graphics.DrawImage(New Bitmap(Imgfile), rect)
e.Graphics.DrawString(sender.Items(e.Index), sender.Font, New SolidBrush(sender.ForeColor), _
New RectangleF(e.Bounds.X + rect.Width, e.Bounds.Y, e.Bounds.Width, e.Bounds.Height))
e.DrawFocusRectangle()
End Sub
End Class
'在窗體上添加一個(gè)按鈕測(cè)試
Private
m_PlayFlag
As
Boolean
=
False
'是否正在播放
Private
Sub
Button1_Click(ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
Button1.Click
If
m_PlayFlag
=
False
Then
Button1.Image
=
Image.FromFile("d:\play.jpg")
'更換為播放圖標(biāo)
m_PlayFlag
=
True
'改變標(biāo)志
Else
Button1.Image
=
Image.FromFile("d:\pause.jpg")
'更換為暫停圖標(biāo)
m_PlayFlag
=
False
'改變標(biāo)志
End
If
End
Sub
Private
Sub
Form1_Load(ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
MyBase.Load
'窗體加載時(shí)使用暫停圖標(biāo)
Button1.Image
=
Image.FromFile("d:\pause.jpg")
End
Sub
打包過(guò)程:
1、打開(kāi)自己已經(jīng)創(chuàng)建好的VB.NET項(xiàng)目(一般一開(kāi)始創(chuàng)建項(xiàng)目的時(shí)候創(chuàng)建的是Windows窗體應(yīng)用程序)。
2、點(diǎn)“文件”--“新建項(xiàng)目”--“其他項(xiàng)目類(lèi)型”--“安裝部署”--“Visual Studio Installer”--“安裝項(xiàng)目”,輸入項(xiàng)目名稱(chēng)(此處命名為setup1)并點(diǎn)擊“確定”。
3、執(zhí)行完上一步,在解決方案下面會(huì)出現(xiàn)setup1項(xiàng)目。右擊setup1項(xiàng)目--“添加”--“項(xiàng)目輸出”。
4、在“添加項(xiàng)目輸出組”中,選擇“主輸出”,然后單擊“確定”。將自動(dòng)添加所有依賴(lài)項(xiàng)。
5、在解決方案資源管理器中,右擊安裝項(xiàng)目---“添加”---“合并模塊”。? 把相關(guān)模塊添加進(jìn)來(lái)。
6、在文件系統(tǒng)選項(xiàng)卡中添加所需的應(yīng)用程序圖標(biāo)等文件,并生成應(yīng)用程序的桌面快捷方式,在快捷方式上右鍵選擇屬性,并在屬性欄中的圖標(biāo)處選擇應(yīng)用程序快捷方式圖標(biāo)。(要在用戶(hù)桌面和用戶(hù)的“程序”菜單屬性里將AlwaysCreate屬性的值修改為T(mén)rue)。這樣安裝完程序后就可以看到桌面的圖標(biāo)了
7、關(guān)于應(yīng)用程序圖標(biāo)的詳細(xì)說(shuō)明:
(1)點(diǎn)擊“應(yīng)用程序文件夾”并在右側(cè)的列表中的“主輸出來(lái)自。。”上右鍵然后點(diǎn)擊“創(chuàng)建主輸出來(lái)自。。的快捷方式”
(2)把生成的快捷方式復(fù)制到“用戶(hù)桌面”,然后右鍵重命名為你想要在程序安裝后顯示的名字。
(3)重命名完成后在右側(cè)的屬性欄中點(diǎn)擊圖標(biāo)設(shè)置為自己想要的圖標(biāo),注意,需要先把圖標(biāo)文件ico加入到“應(yīng)用程序文件夾”中。(ico的制作:先做好256*256的png文件,然后百度ico制作找到在線(xiàn)制作ico的網(wǎng)站,直接生成ico圖標(biāo)文件)
關(guān)于安裝后的一些屬性的設(shè)置:
新聞名稱(chēng):vb.net設(shè)置圖標(biāo) vb標(biāo)簽控件圖標(biāo)
標(biāo)題來(lái)源:http://chinadenli.net/article0/hghgio.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站內(nèi)鏈、企業(yè)網(wǎng)站制作、動(dòng)態(tài)網(wǎng)站、微信小程序、網(wǎng)站營(yíng)銷(xiāo)、品牌網(wǎng)站設(shè)計(jì)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶(hù)投稿、用戶(hù)轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話(huà):028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)