怎么枚举出资源文件中的所有内容

2017-05-06 02:24
Dim resWriter As New Resources.ResourceWriter("d:\\123.dat")
resWriter.AddResourceData("001", "ResourceTypeCode.Stream", arr)
resWriter.Close()
resWriter.Dispose()
Erase arr

通过上面这段代码可以把数组内容写到资源文件里面,然后可以通过下面这段代码再读出来
Dim resReader As New Resources.ResourceReader("d:\\123.dat")
resReader.GetResourceData("001", "ResourceTypeCode.Stream", arr)

但是这个只能读出某个固定的内容,比如上面这段只能读出resourcename=001的资源,如果我不知道resourcename怎么把资源文件里的内容全部枚举出来

回复讨论(解决方案)

你的意思是你这个数据是多段的,你每次添加一批数据到里面,但数据名称这次可能是"001"下次可能是"ABC"~然后你想全部读取.
但是前提是你不清楚最后到底有哪几个名称的数据段被添加在里面,然后你想一次性以杖举的方式赋值每个数据段是吧! 
嗯,差不多是这个意思吧

简单来说我手头上有一个资源文件,已知是通过AddResourceData方法加进去的,但是不知道name是什么,现在要取出来,所以想把这个资源文件里面包含的所有资源都枚举出来
        Dim arr() As Byte = Nothing
        Dim All As New List(Of Byte())
        Dim resReader As New Resources.ResourceReader("d:\\123.dat")
        Dim a = resReader.GetEnumerator()
        While a.MoveNext()
            resReader.GetResourceData(a.Key, a.ToString.Split("+")(0), arr)
            All.Add(arr)
        End While

我想这可能就是你想要的答案吧!
http://blog.csdn.net/zgke/article/details/3887726
thanks