浅析Visual Basic.NET中的资源使用

示例2：在net中可执行文件中嵌入一个文本文件。

　　以前我做程序，版权使用协议信息总是放在一个txt文本文件中，打包时和可执行文件放在一起，在安装时释放到程序的安装路径，然后再打开使用。这种做法有两大坏处，一是这个文件很容易被其它人修改，二是可以套用蜡笔小新的一句话："这种做法太不成熟了吧！"。现在我使用一个新的方法，就是将协议和可执行文件结合在一起，在程序运行时读出使用，当然这就全靠资源的作用了。步骤如下：

　　1、在VB.net中新建一个项目，类型选择windows应用程序,项目名称改为resourcesample2。

　　2、点击项目菜单，选择添加现有项，接着会弹出一个文件对话框，将文件类型改为所有文件后，选择要嵌入的txt文件（其实这时你可选择任意文件，只要你喜欢*-）。接着你会在解决方案资源管理器中发现你新加入的文件名。如图：

　　　　　　　　　　　

　　3、关键的一步到了，在解决方案资源管理器中点击你刚加入的文件名，然后在属性窗体中将 "加成操作" 这一属性改为"嵌入的资源"，这将告诉net，刚加入的文件将会作为资源链接进可执行文件中。留意一下文件名哦，这在后面的程序中也很重要，强烈建议使用小写文件名！如下图：


　　4、接下就是在程序中用代码读出这个文件的内容。

　　在Form1_Click事件中加入代码，如下所示：

Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Click Dim tobjStream As IO.Stream = Me.GetType.Assembly.GetManifestResourceStream("resourcesample2.License.txt") Dim tobjStreamReader As New IO.StreamReader(tobjStream, System.Text.Encoding.Default) Dim tstrLicense As String = tobjStreamReader.ReadToEnd '如果是图象就可以使用dim tobjBMP as new bmp(tobjstrem)的方法直接得到资源内容 MessageBox.Show(tstrLicense)'显示刚才读得的结果 End Sub

　　在此对上述代码进行一点解释，net是通过Assembly的GetManifestResourceStream读出嵌入在可执行文件的资源并以IO.Stream对象返回（反正得到了这个流，就好象你时进行文件流操作，读/写到磁盘或象我一样在程序内部处理都由你自己决定了）。这个方法的唯一参数是资源的唯一标识，是按如下方式组成的：程序集的根命名空间+"."+资源在属性窗口显示的文件名（这是区分大小写的，在上文已提醒你注意了哦，而且这个标识法在C#中是不同的，别问我为什么，谁叫你不和我一样使用VB.net，哼8-）。

　　程序集的根命空间的名你可以从项目菜单下的XXXX（XXXX是你的项目名称，可不要认为是骂人的话8-）属性中看到：


　　其余的代码就是以流方式读文件了，很简单吧。

　　5、按生成菜单下的生成解决方案，然后到你可执文件的目录下看看，你会发现除了可执行文件外没有别的文本文件，因为文本文件已以资源的方式存在于可执行文件中啦。运行一下看看效果啊（一些想做黑客的菜鸟又有什么怪怪的想法，藏木马？……）

　　资源的使用就介绍到此为至吧，窗外依然小雨菲菲，在虚幻的网络和残酷的现实边缘排徊久了，写文章都有点怪怪的，请大伙儿原谅，祝大伙编程愉快。

查看本文来源