So ändern Sie die Bilder in Visual Basic

March 29

Wenn Sie mehrere Bilder in Ihrem Visual Basic-Projekt verwenden möchten, müssen Sie Dutzende von PictureBox-Steuerelemente haben, ein- und Ausblenden von ihnen nach Bedarf. Verwenden Sie stattdessen das ImageList-Steuerelement eine Auflistung von Bildern verwalten. Erstellen Sie eine Indexvariable, kannst du die Bilder angezeigt, die in Ihrem Programm ändern. Die ImageList selbst braucht andere Steuerelemente zugreifen und diese ändern aktive Bilder in Ihrem Programm, wie z. B. Befehlsschaltflächen. Verwenden Sie, wenn Sie Anweisungen zur Überprüfung des Werts des Bildes indizieren, um zu vermeiden, dass Runtime Fehler in Ihrem Programm.

Anweisungen

1 Öffnen Sie Visual Basic-Projekt, im Entwurfsmodus. Doppelklicken Sie auf das "ImageList"-Steuerelement, um einen zu Ihrem Projekt hinzufügen. Dieses Steuerelement wird nicht als physische Steuerelement auf dem Formular angezeigt, so dass Sie nicht konfigurieren, der Darstellung oder des Namens um es zu unterscheiden, es sei denn, Sie möchten.

2 Klicken Sie auf das Steuerelement "ImageList1", die Sie hinzugefügt, um seine Eigenschaftenliste zu öffnen. Klicken Sie auf "Bilder" Eigenschaften und dann die Box mit "..." drin. Daraufhin wird das Dialogfeld "Bild-Auflistungs-Editor", in dem Sie Ihre Sammlung von Bilder speichern.

3 Klicken Sie auf "Hinzufügen". Navigieren Sie Ihre Systemdateien für Bilder und der ImageList-Auflistung hinzufügen. Wenn sie im gleichen Ordner sind, können Sie mehrere Bilder gleichzeitig hinzufügen. Beachten Sie, dass die Bilder am Index 0 (null) in der Liste "Mitglieder" starten. Wenn Sie Bilder zu der Auflistung hinzufügen alle, klicken Sie auf "OK".

4 Doppelklicken Sie auf das Steuerelement "PictureBox" aus der Symbolleiste, um dieses Steuerelement zu Ihrer Liste hinzufügen. Auch, doppelklicken Sie das Steuerelement "Button" zweimal, um zwei dieser Steuerelemente sowie hinzuzufügen. Ordnen Sie die Steuerelemente, um die beiden Tasten in einer Reihe mit der PictureBox über ihnen angezeigt haben. Ändern Sie die Eigenschaft "Text" für die linke Taste auf "Zurück" und die Eigenschaft "Text" für die Rechte Maustaste auf "Weiter".

5 Öffnen Sie das Codefenster. Erstellen Sie eine globale Variable zu verfolgen den Index des Bildes indem Sie Folgendes eingeben:

Dim ImageIndex As Short = 0

6 Zugriff auf die Sub "Button1_Click" und geben Sie Folgendes ein:

Wenn ImageIndex = 0 Then

ImageIndex = ImageList1.Images.Count() - 1

PictureBox1.Image = ImageList1.Images.Item(imageIndex)

Sonst

ImageIndex = 1

PictureBox1.Image = ImageList1.Images.Item(imageIndex)

EndIf

Auf diese Weise testen um zu sehen, wobei der Index ist. Wenn der Benutzer auf die Schaltfläche "Zurück" klickt und der Index des ersten Elements in der ImageList zeigt, wird der Index geht zum letzten Bild in der ImageList und angezeigt. Ansonsten, es verringert den Index und Displays, die Bild-Index.

7 Zugriff auf die Sub "Button2_Click" und geben Sie Folgendes ein:

Wenn ImageIndex = ImageList1.Images.Count() - 1 dann

ImageIndex = 0

PictureBox1.Image = ImageList1.Images.Item(imageIndex)

Sonst

ImageIndex += 1

PictureBox1.Image = ImageList1.Images.Item(imageIndex)

EndIf

Wie die "Zurück"-Knopf überprüft dies wo der Index ist. Wenn der Benutzer auf den Schaltfläche "Weiter" klickt und der Index dem letzten Element in der ImageList den Index zurückgibt zeigt, die erste der ImageList Elemente und angezeigt. Andernfalls erhöht den Index um 1 und zeigt das Bild.