Il linguaggio di programmazione Visual Basic di Microsoft ha una cassetta degli attrezzi robusto per la creazione di applicazioni Windows Form in breve tempo e con relativa facilità. Il controllo ListBox è uno di quegli strumenti , usarlo per offrire agli utenti una serie di opzioni fra cui scegliere . È anche possibile consentire all'utente di aggiungere o eliminare dal contenuto di una ListBox , e per fare questo, si deve essere in grado di cercare l'oggetto ListBox di agire sulla voce corretta . Istruzioni
1

Fare clic su "Start ", " Tutti i programmi " e selezionare il Microsoft Visual Studio o Visual Basic Express, a seconda di quale è stato installato .
2

Clicca sul link " Nuovo progetto" sulla pagina iniziale di Visual Studio , selezionare " Applicazione Windows Form " e fare clic su " OK ". Questo apre un nuovo modulo vuoto nella finestra di progettazione .

3 Fare clic sulla scheda "Casella degli strumenti " a sinistra dello schermo per espanderla. Fare doppio clic sul controllo " ListBox " . Fare doppio clic sul controllo " Button " e fare doppio clic sul controllo " TextBox " . Questo aggiunge uno di ciascuno al form. Fare clic nella finestra di progettazione per comprimere la casella degli strumenti .
4

Cliccare sulla ListBox in forma . Scorrere verso il basso per la proprietà " Voci " nelle proprietà di Windows in basso a sinistra dello schermo . Fare clic sulla casella di puntini di sospensione per aprire una finestra per l'immissione di elementi. Inserisci varie voci dell'elenco , premendo " Invio" dopo ogni elemento di metterli su righe separate .

5 Fare doppio clic sul pulsante per aprire la finestra del codice VB . Il cursore appare tra le righe simili a queste :

Private Sub Button1_Click ( ByVal sender As System.Object , ByVal e As System.EventArgs ) per

Maniglie Button1.Click

End Sub

Inserire il codice seguente tra le righe di cui sopra per cercare la lista di un duplicato di quello che l' utente inserisce nel campo di testo :
< p > '

' commento - questo codice cerca la casella di riepilogo per un duplicato di ciò che l'utente digitato

' nel box

'

Dim ListItemCounter As Integer

TextBox1.Text > niente allora

fare fino ListItemCounter = ListBox1.Items.Count ( ) per

TextBox1.Text.ToUpper = ( ListBox1.Items ( ListItemCounter ) ) . ToUpper ( ) Poi

MessageBox.Show ( " elemento duplicato trovato" ) per

Torna

Else

ListItemCounter + = 1

End If loop

MessageBox.Show (" la voce che hai inserito non è nella lista " ) per

End If

questo codice cerca tra gli elementi in ListBox per l' elemento che è stato inserito nel TextBox . Nota Il metodo accodato " ToUpper " in modo che il confronto elimina caso come un potenziale problema . Se l'articolo è trovato , un messaggio corrispondente viene emesso , se l'oggetto non viene trovato , un "non trovato " messaggio viene emesso
6

Fare clic sulla voce di menu " Debug " nella parte superiore della . schermo e fare clic sul collegamento "Start debugging " . Si apre l'applicazione in modalità di test . Inserire un elemento che è nella lista in TextBox e fare clic sul pulsante . Si dovrebbe vedere il messaggio " duplicato voce" . Inserire un elemento in TextBox che non è nella lista e fare clic sul pulsante . Ora si dovrebbe vedere il messaggio " elemento non trovato" .