Wenn Sie mehrere Bilder in Ihrem Visual Basic-Projekt verwenden müssen, brauchen Sie nicht zu Dutzenden von PictureBox-Steuerelemente haben , Ein-und Ausblenden Sie sie nach Bedarf . Verwenden Sie stattdessen das ImageList-Steuerelement , um eine Sammlung von Bildern zu erhalten. Durch das Erstellen eines Index variable , können Sie verändern die Bilder in Ihrem Programm angezeigt. Die ImageList selbst benötigt andere Steuerelemente zugreifen und diese ändern aktiven Bilder in Ihrem Programm , wie z. B. Schaltflächen . Verwendung Wenn Aussagen den Wert des Bildes Index zu überprüfen, um zu vermeiden, dass Laufzeitfehlern in Ihrem Programm. Anleitung
1
Öffnen Sie Visual Basic-Projekt im Entwurfsmodus . Doppelklicken Sie auf das " ImageList " Steuerung einer zu Ihrem Projekt hinzuzufügen . Diese Regelung gilt nicht als physische Kontrolle auf dem Formular angezeigt , so dass Sie nicht haben , um sein Aussehen oder Namen, um ihn zu konfigurieren unterscheiden , es sei denn du willst.
2
Klicken Sie auf die Schaltfläche " ImageList1 " steuern Sie hinzugefügt , um dessen Eigenschaften zu öffnen. Klicken Sie auf die "Bilder"- Eigenschaften und dann die Box mit "..." in ihm. Es öffnet sich das " Bild -Editor "-Dialog , wo Sie Ihre Sammlung von Bildern .
3
Klicken Sie auf die Schaltfläche "Hinzufügen" . Navigieren Sie Ihre Systemdateien für Bilder und fügen Sie sie der ImageList Sammlung . Sie können mehr als ein Bild auf einmal hinzufügen , wenn sie in den gleichen Ordner sind . Beachten Sie, dass die Bilder bei Index Null beginnen in der Liste "Mitglieder" . Wenn Sie das Hinzufügen von Bildern der Sammlung zu beenden , klicken Sie auf die Schaltfläche "OK" .
4
Doppelklicken Sie auf das " Picture " -Steuerelement aus der Symbolleiste, um dieses Steuerelement zu Ihrer Liste hinzufügen. Auch , doppelklicken Sie auf den "Button" -Steuerung zweimal, um zwei dieser Kontrollen sowie hinzuzufügen. Ordnen Sie die Steuerelemente , um die beiden Buttons in einer Reihe mit der PictureBox über ihnen angezeigt werden . Ändern Sie die Eigenschaft "Text" für die linke Taste, um " Zurück " und " Text" -Eigenschaft für die Rechts-Taste auf " Weiter".
5
Öffnen Sie das Codefenster . Erstellen Sie eine globale Variable Spur des Bildes Index zu halten, indem Sie Folgendes eingeben:
Dim imageindex As Short = 0
6
Zugriff auf die " Button1 " sub und geben Sie die folgenden Schritte aus:
Wenn imageindex = 0 Then
imageindex = ImageList1.Images.Count () - 1 of
PictureBox1.Image = ImageList1.Images.Item ( imageindex )
< p > Else
imageindex - = 1
PictureBox1.Image = ImageList1.Images.Item ( imageindex )
End If
Diese Tests , um zu sehen , wo die Index ist . Wenn der Benutzer auf die Schaltfläche "Zurück" und der Index zeigt das erste Element in der ImageList , bewegt sich der Index bis zum letzten Bild in der ImageList und zeigt es an. Ansonsten dekrementiert sie den Index von ein und zeigt , dass die Bild -Index
7
Zugriff auf die " Button2_Click " sub und geben Sie die folgenden Schritte aus: .
Wenn imageindex = ImageList1.Images.Count ( ) - 1 Dann
imageindex = 0
PictureBox1.Image = ImageList1.Images.Item ( imageindex )
Else
imageindex + = 1
PictureBox1.Image = ImageList1.Images.Item ( imageindex )
End If
Wie die "Zurück" -Taste , diese Tests , um zu sehen , wo der Index . Wenn der Benutzer auf die Schaltfläche "Weiter" und der Index zeigt die letzten Artikel in der ImageList , kehrt der Index auf das erste der ImageList Artikel und zeigt sie an. Ansonsten ist es erhöht den Index um ein und zeigt , dass Bild .
