Come modificare le immagini in Visual Basic

Se è necessario utilizzare più immagini in un progetto Visual Basic , non c'è bisogno di avere decine di controlli PictureBox , mostrare e nascondere quando necessario . Invece , utilizzare il controllo ImageList a mantenere una raccolta di immagini . Con la creazione di una variabile indice , è possibile modificare le immagini visualizzate nel programma. La ImageList stesso ha bisogno di altri controlli per accedere e modificare le immagini attive nel programma , come ad esempio pulsanti di comando . Utilizzare if per verificare il valore dell'indice immagine per evitare di causare errori di runtime nel programma. Istruzioni
1

Aprire il progetto di Visual Basic in modalità progettazione. Fare doppio clic sul controllo " ImageList " per aggiungere uno al progetto . Questo controllo non appare come un controllo fisico sul modulo , in modo che non c'è bisogno di configurare il suo aspetto o il nome per differenziarlo a meno che non si desidera .
2

Clicca sul comando " ImageList1 " si aggiunto per aprire la lista di proprietà . Clicca sulle "Immagini" Proprietà e quindi la casella con " ..." in esso . Verrà visualizzata la finestra di dialogo " Immagine Editor " in cui memorizzare la vostra collezione di immagini .
3

Fare clic sul pulsante "Aggiungi" . Naviga i tuoi file di sistema per le immagini e aggiungerle alla collezione ImageList . È possibile aggiungere più di un'immagine alla volta se sono nelle stesse cartelle . Si noti che le immagini cominciano a indice zero nella lista " Utenti " . Quando hai finito di aggiungere le immagini alla raccolta, fare clic sul pulsante "OK" .
4

Fare doppio clic sul controllo " PictureBox " dalla barra degli strumenti per aggiungere questo controllo alla vostra lista. Inoltre , fare doppio clic sul controllo " Button " due volte per aggiungere due di questi controlli pure. Disporre i controlli per avere i due pulsanti visualizzati in una riga con la PictureBox sopra di loro . Modificare la proprietà "text" per il tasto sinistro su " precedente" e la proprietà "text" per il diritto Button su " Avanti ".
5

Aprire la finestra del codice . Creare una variabile globale per tenere traccia dell'indice dell'immagine digitando il seguente :

Dim imageindex As Short = 0
6

accesso ai sub " Button1_Click " e digitare il seguente :

Se imageindex = 0 Then

imageindex = ImageList1.Images.Count ( ) - 1

PictureBox1.Image = ImageList1.Images.Item ( imageindex ) per

Else

imageindex - = 1

PictureBox1.Image = ImageList1.Images.Item ( imageindex ) per

End If

test per vedere dove l' indice è . Se l' utente fa clic sul pulsante "Indietro" e l'indice sta mostrando il primo elemento nella ImageList , l'indice si sposta verso l'ultima immagine in ImageList e lo visualizza. In caso contrario , si decrementa l'indice di uno e mostra che l'indice di immagine
7

accesso ai sub " Button2_Click " e digitare quanto segue : .

Imageindex ImageList1.Images.Count = ( ) - 1 Allora

imageindex = 0

PictureBox1.Image = ImageList1.Images.Item ( imageindex ) per

Else

imageindex + = 1

PictureBox1.Image = ImageList1.Images.Item ( imageindex ) per

End If

Come il pulsante "Indietro" , questo test per vedere dove l' indice è . Se l'utente fa clic sul pulsante "Avanti " e l'indice sta mostrando l'elemento finale nella ImageList , l'indice torna al primo degli oggetti ImageList e lo visualizza. In caso contrario , incrementa l' indice di uno e visualizza l'immagine .

• Come connettersi a MDB tramite Visual Basic 
• Come impedire il ridimensionamento in Visual Basic