Vb.net 在picturebox中循环浏览图片并将其名称添加到combobox?

Vb.net 在picturebox中循环浏览图片并将其名称添加到combobox?,vb.net,loops,combobox,picturebox,Vb.net,Loops,Combobox,Picturebox,我在picturebox中有大约20张图片,我想循环浏览所有图片并将其名称添加到组合框中,然后我使用组合框更改picturebox中的图片。我不知道如何循环浏览picturebox图像 例如..这些名字 这里有几件事需要解决。最重要的是,Image对象没有名称,因此没有要列出的内容。也许您指的是创建图像对象的文件名,但这是不同的。除非将ImageLocation属性设置为加载文件,否则无法从PictureBox控件获取这些文件。假设您已经这样做了,您可以从PictureBoxes中获得每个文件的

我在picturebox中有大约20张图片,我想循环浏览所有图片并将其名称添加到组合框中,然后我使用组合框更改picturebox中的图片。我不知道如何循环浏览picturebox图像

例如..这些名字
这里有几件事需要解决。最重要的是,
Image
对象没有名称,因此没有要列出的内容。也许您指的是创建
图像
对象的文件名,但这是不同的。除非将
ImageLocation
属性设置为加载文件,否则无法从
PictureBox
控件获取这些文件。假设您已经这样做了,您可以从
PictureBoxes
中获得每个文件的名称,如下所示:

Dim fileNames = Controls.OfType(Of PictureBox)().
                         Select(Function(pb) IO.Path.GetFileName(pb.ImageLocation))

但这仍然没有真正意义。在加载
图像之前获取文件名似乎更有意义。不过,您的解释还不够充分,无法提供可靠的解决方案。

要使用资源中的图像填充组合框,请执行以下操作:

   For Each dicEntry As DictionaryEntry In resourceSet.OfType(Of Object)()
        If TypeOf (dicEntry.Value) Is Drawing.Image Then
            ComboBox1.Items.Add(dicEntry.Key.ToString())              
        End If
   Next
要选择图像并将其设置为PictureBox,请执行以下操作:

 Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
     Dim comboBox As ComboBox = CType(sender, ComboBox)
     Dim sSelectedItem = CType(comboBox.SelectedItem, String)
     Dim img As Image = CType(My.Resources.ResourceManager.GetObject(sSelectedItem), Image)
     PictureBox1.BackgroundImage = img
 End Sub

你的更新没有价值。没有迹象表明您显示的姓名列表与您描述的
图像之间的关系。您没有解决我在回答中提出的任何问题。有没有办法在resources文件夹中指定一个文件夹?