Fügen Sie mehrere .jpg ' s, von der Datei zum Bild-array

Werde ich kurz halten und einfach... ich habe diese Frage gestellt, bevor, aber Es war nicht beantwortet.
Ich würde gerne mehrere Bilder aus einem Ordner, und fügen Sie Sie in ein array.
Ist dies nicht funktioniert, kann mir jemand explizit sagen Sie mir, wie es zu tun? Danke!

Laden der Form:

Private Sub Button1_Add(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim PictureArray As New List(Of Image)
    For Each item As String In Directory.GetFiles("C:\Users\turcotd\Desktop\ITLPers", "*.jpg", IO.SearchOption.AllDirectories)
        Dim _Image As Image = Image.FromFile(item)
        PictureArray.Add(_Image)
    Next

    If (i < 6) Then
        Dim pb As New PictureBox
        Me.FlowLayoutPanel1.Controls.Add(pb)
        pb.Image = PictureArray(i)
        i = i + 1

Fügen Sie mehrere .jpg ' s, von der Datei zum Bild-array
Danke!!!

InformationsquelleAutor Growler | 2012-01-16
Schreibe einen Kommentar