Aprire un nuovo progetto di Visual Basic . Aggiungi tutti di un controllo PictureBox , il controllo ImageList e due pulsanti per la forma . Disporre " Button1 " a sinistra della PictureBox e " Button2 " a destra .
2
destro del mouse sul controllo " ImageList1 " e fare clic su " scegliere le immagini . " Nella finestra di dialogo che viene visualizzata , fare clic sul pulsante "Aggiungi" . Spostarsi tra i file e aggiungere il comando di immagini . Fare clic sul pulsante "OK " quando hai finito .
3
Modificare la proprietà Name per Button1 per " bPrevious " e la proprietà Text su " precedente ", la proprietà nome per Button2 a " bnext "e la proprietà text su" Immagine successiva "e la proprietà nome per PictureBox1 a" pbPicture . "
4
Premere" F7 "per aprire la finestra del codice . . Tipo " Dim pictureIndex As Integer " nella parte superiore della dichiarazione di classe per creare una variabile si utilizza come indice per il vostro ImageList
5
Apri la funzione Form1_Load e digitare quanto segue :
pictureIndex = 0
pbPicture.Image = ImageList1.Images.Item ( pictureIndex ) per
Questo imposta il valore della variabile indice a zero e inizializza il pbPicture con la prima immagine nell'elenco delle immagini .
6
Aprire la funzione bPrevious_Click e digitare quanto segue:
pictureIndex = 0 Then
pictureIndex = ImageList1.Images.Count - 1
Else
pictureIndex = pictureIndex - 1
End If
pbPicture.Image = ImageList1.Images.Item ( pictureIndex ) per
controlli per vedere se l'indice di immagine si trova all'inizio della ImageList e in caso affermativo , visualizza l'ultimo elemento dell'insieme . In caso contrario , si decrementa l'indice per uno, quindi visualizza il valore di indice della ImageList
7
Aprire la funzione bNext_Click e digitare quanto segue: .
PictureIndex = ImageList1.Images . count - 1 Poi
pictureIndex = 0
Else
pictureIndex = pictureIndex + 1
End If
pbPicture.Image = ImageList1 . Images.Item ( pictureIndex ) per
questo modo si controlla per vedere se l'indice di immagine si trova alla fine della ImageList e in tal caso , viene visualizzato il primo elemento dell'insieme . In caso contrario , si incrementa l'indice per uno, quindi visualizza il valore di indice della ImageList .
Programmazione © www.354353.com