C#代码：

System.Reflection.Assembly asm = System.Reflection.Assembly.GetExecutingAssembly(); // Note that the name for the embedded resource is case sensitive and must match the file name. Bitmap bmp = new Bitmap(asm.GetManifestResourceStream(asm.GetName().Name + "." + "pic.png")); e.Graphics.DrawImage(bmp,5,8,new Rectangle(0,bmp.Width,bmp.Height),GraphicsUnit.Pixel)

<span class="typ">GetManifestResourceStream</span><span class="pun">得到的</span><span class="typ">Stream</span><span class="pun">是</span><span class="kwd">null</span><span class="pun">（</span><span class="pln">VB</span><span class="pun">中为</span><span class="typ">Nothing</span><span class="pun">）的<</span><span class="pln">a href</span><span class="pun">=</span><span class="str">"/tag/jiejue/"</span><span class="pln"> target</span><span class="pun">=</span><span class="str">"_blank"</span><span class="pln"> </span><span class="kwd">class</span><span class="pun">=</span><span class="str">"keywords"</span><span class="pun">>解决</</span><span class="pln">a</span><span class="pun">>其实最主要的是在</span>
<span class="pun">将<</span><span class="pln">a href</span><span class="pun">=</span><span class="str">"/tag/tupian/"</span><span class="pln"> target</span><span class="pun">=</span><span class="str">"_blank"</span><span class="pln"> </span><span class="kwd">class</span><span class="pun">=</span><span class="str">"keywords"</span><span class="pun">>图片<</span><span class="str">/a>资源的<a href="/</span><span class="pln">tag</span><span class="pun">/</span><span class="pln">shuxing</span><span class="pun">/</span><span class="str">" target="</span><span class="pln">_blank</span><span class="str">" class="</span><span class="pln">keywords</span><span class="str">">属性</a>设置为"</span><span class="pun">嵌入的资源</span><span class="str">"："</span><span class="pun"><</span><span class="pln">a href</span><span class="pun">=</span><span class="str">"/tag/shuxing/"</span><span class="pln"> target</span><span class="pun">=</span><span class="str">"_blank"</span><span class="pln"> </span><span class="kwd">class</span><span class="pun">=</span><span class="str">"keywords"</span><span class="pun">>属性<</span><span class="str">/a>-<a href="/</span><span class="pln">tag</span><span class="pun">/</span><span class="pln">shengcheng</span><span class="pun">/</span><span class="str">" target="</span><span class="pln">_blank</span><span class="str">" class="</span><span class="pln">keywords</span><span class="str">">生成</a>操作-嵌入的资源"</span>
<span class="pun">注意</span><span class="typ">GetManifestResourceStream</span><span class="pun"><</span><span class="pln">a href</span><span class="pun">=</span><span class="str">"/tag/hanshu/"</span><span class="pln"> target</span><span class="pun">=</span><span class="str">"_blank"</span><span class="pln"> </span><span class="kwd">class</span><span class="pun">=</span><span class="str">"keywords"</span><span class="pun">>函数<</span><span class="str">/a>的参数：asm.GetName().Name获得的只是当前命名空间的<a href="/</span><span class="pln">tag</span><span class="pun">/</span><span class="pln">mingcheng</span><span class="pun">/</span><span class="str">" target="</span><span class="pln">_blank</span><span class="str">" class="</span><span class="pln">keywords</span><span class="str">">名称</a>，</span>
<span class="str">如果在"</span><span class="pln">pic</span><span class="pun">.</span><span class="pln">png</span><span class="str">"<a href="</span><span class="pun">/</span><span class="pln">tag</span><span class="pun">/</span><span class="pln">tupian</span><span class="pun">/</span><span class="str">" target="</span><span class="pln">_blank</span><span class="str">" class="</span><span class="pln">keywords</span><span class="str">">图片</a>在当前工程的Photo目录下，那么该参数就该写成</span>
<span class="str">asm.GetName().Name + "</span><span class="pun">.</span><span class="str">"+ "</span><span class="typ">Photo</span><span class="str">" + "</span><span class="pun">.</span><span class="str">" + "</span><span class="pln"> pic</span><span class="pun">.</span><span class="pln">png</span><span class="str">"。</span>

VB代码

Function GetResourceImage(ByVal aStrFileName As String) As Image Dim MyAsm As Reflection.Assembly = Reflection.Assembly.GetExecutingAssembly() Dim aStream As System.IO.Stream = MyAsm.GetManifestResourceStream(MyAsm.GetName().Name & "." & aStrFileName) If aStream Is Nothing Then Return Nothing Else Return New Drawing.Bitmap(aStream) End If End Function