Use this to extract an icon embedded as a resource in your project. Call the function supplying the full path to the resource, for example:
Dim myIcon as Icon = EmbeddedIcon("MyApplication1.myicon.ico")
Where "MyApplication1" is the root namespace for the project.
- Imports System.Reflection.Assembly
- 'returns an embedded resource icon by name
- Public Function EmbeddedIcon(ByVal Name As String) As Icon
- Return New Icon(GetExecutingAssembly.GetManifestResourceStream(Name))
- End Function
You need to login to post a comment.