如何获取资源文件中所有资源的名称

Question

在Visual Basic项目中,我添加了一个包含一堆图像的资源文件(resx).

现在我想查询图像的名称.如果我在Visual Studio IDE的设计器视图中打开resx文件并选择一个图像,属性网格会显示一个名称属性(默认为"没有扩展名但可以更改的文件名").

背景是我有一个在运行时创建的图像列表,并填充了资源文件中的图像.为了能够通过密钥访问这些图像,我必须设置它.

我的代码看起来像这样(所有硬编码):

Dim imagelist as new Imagelist
imageList.Images.Add("A", My.Resources.MyImages.A)
imageList.Images.Add("B", My.Resources.MyImages.B)
imageList.Images.Add("C", My.Resources.MyImages.C)
imageList.Images.Add("D", My.Resources.MyImages.D)
imageList.Images.Add("E", My.Resources.MyImages.E)
....
imageList.Images.Add("XYZ", My.Resources.MyImages.XYZ)

我希望得到这个:

Dim imagelist as new ImageList

For Each img in GetMeAllImagesWithNameFromMyResourceFile
    imageList.Images.Add(img.Name, img.ImageFile)
Next

其中Name是一个字符串,ImageFile是一个System.Drawing.Bitmap

Answer 1

看看这段代码是否有帮助.

    Dim runTimeResourceSet As Object
    Dim dictEntry As DictionaryEntry

    runTimeResourceSet = My.Resources.ResourceManager.GetResourceSet(System.Globalization.CultureInfo.CurrentCulture, False, True)
    For Each dictEntry In runTimeResourceSet
        If (dictEntry.Value.GetType() Is GetType(Icon)) Then
            Console.WriteLine(dictEntry.Key)
        End If
    Next

我使用Icon作为示例,如果您使用Bitmap,则必须更改.

编辑:你将不得不使用dictEntry.Value的参考,并看看它如何用于将其添加到imagelist.