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 : ' ' 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 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" .
6
Informazioni correlate
Programmazione © www.354353.com