vb.net獲得文件圖標 vbnet filestream

vb.net怎樣獲取應(yīng)用程序的圖標

''' summary

為企業(yè)提供網(wǎng)站設(shè)計、成都網(wǎng)站制作、網(wǎng)站優(yōu)化、成都營銷網(wǎng)站建設(shè)、競價托管、品牌運營等營銷獲客服務(wù)。成都創(chuàng)新互聯(lián)擁有網(wǎng)絡(luò)營銷運營團隊,以豐富的互聯(lián)網(wǎng)營銷經(jīng)驗助力企業(yè)精準獲客,真正落地解決中小企業(yè)營銷獲客難題,做到“讓獲客更簡單”。自創(chuàng)立至今,成功用技術(shù)實力解決了企業(yè)“網(wǎng)站建設(shè)、網(wǎng)絡(luò)品牌塑造、網(wǎng)絡(luò)營銷”三大難題,同時降低了營銷成本,提高了有效客戶轉(zhuǎn)化率,獲得了眾多企業(yè)客戶的高度認可!

''' 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.net安裝后自帶非常多的圖標,我的是vb2008,其路徑為:C:\Program Files\Microsoft Visual Studio 9.0\Common7\VS2008ImageLibrary\2052\VS2008ImageLibrary

自己解壓VS2008ImageLibrary后就能看到大量的常用圖標

VB.NET如何獲取其他程序集里的圖標??

Icon.ExtractAssociatedIcon(string);

返回指定文件中所包含的圖標

//////////////////////////////////////////

可以,你可以使用ToBitmap()方法將其轉(zhuǎn)換為一個將此 Icon 轉(zhuǎn)換為 GDI+ Bitmap。

Image mImage = Icon.ExtractAssociatedIcon(string).ToBitmap();

網(wǎng)站欄目:vb.net獲得文件圖標 vbnet filestream
瀏覽地址:http://muchs.cn/article28/dohcsjp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供面包屑導航企業(yè)建站、網(wǎng)站收錄網(wǎng)站設(shè)計公司、微信公眾號

廣告

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

h5響應(yīng)式網(wǎng)站建設(shè)