Creare un nuovo progetto EXE standard di Visual Basic . Selezionare il controllo " ComboBox " e quindi fare clic sul form " Form1 " che è stato creato per impostazione predefinita per aggiungerlo. Ora avrete un ComboBox denominata " Combo1 " sul modulo .
2
Rinominare la ComboBox per qualcosa di significativo . Se il contenuto del controllo saranno abbreviazioni Stato degli Stati Uniti , il nome delle " cmbStates ". Controllo Lo stile predefinito del controllo ComboBox è "0 - combinata a discesa . " Per non consentire all'utente di digitare in uno stato diverso , cambiare lo stile a "2 - elenco a discesa . "
3
popolare il contenuto del ComboBox " cmbStates " . Se i dati sono memorizzati in un database , recuperare i dati in un recordset e utilizzare il metodo " AddItem " del controllo ComboBox per aggiungere ogni abbreviazione dello stato . Il codice sarà simile a : " cmbStates.AddItem ( oRecordSet.Fields ( " State_abbrev " . ) Valore , i)" - dove " oRecordset " è il nome del set di record restituiti dalla query di database , " State_abbrev " è la colonna nome della tabella , e la "i" inizia da zero e viene incrementato di uno per ogni record elaborato .
4
accedere a un valore specifico in ComboBox popolata sia per valore di testo o il valore di indice . Il valore dell'indice è la proprietà " ListIndex " . Il codice per impostare i contenuti visibili della ComboBox per il quinto valore della ComboBox è " cmbStates.ListIndex ( 4) . "
5
Specificare un valore di indice per una voce particolare codifica manuale " cmbStates . AddItem ( " OH " , 17) . " I requisiti del programma potrebbe essere quella di aggiungere ogni abbreviazione stato indicizzato in base all'ordine in cui loro adesione all'Unione . Se un'altra zona del programma richiede il XVII che ha aderito all'Unione , il codice sarà simile " cmbStates.ListIndex ( 17) " e il valore visualizzato nel controllo sarebbe " OH ". Per recuperare la sigla dello stato e conservare in una variabile : " sSeventeenthState = cmbStates.List ( 17) . "
Programmazione © www.354353.com