In Visual Basic, caselle combinate sono spesso utilizzate in programmi di inserimento dati e quando invio di informazioni tramite moduli online. Per esempio, potrebbe essere necessario selezionare da un elenco di Stati o codici di avviamento postale e facendo clic su un elenco a discesa si presenta con varie selezioni. Una casella combinata viene popolata con voci definite dall'utente che vengono in genere aggiunti dal programmatore in fase di progettazione, ma si può anche riempire una casella combinata con gli elementi da una tabella di database utilizzando solo poche righe di codice.

Istruzioni

1

Avviare Visual Basic facendo clic sul pulsante "Start" e selezionando "Programmi", "Microsoft Visual Studio" e quindi "Microsoft Visual Basic [numero versione]."

2

Selezionare "EXE Standard" sotto la finestra di dialogo "Nuovo progetto". Fare clic su "Apri" per aprire un nuovo modulo.

3

Fare clic sul controllo "ComboBox" dalla casella degli strumenti sulla sinistra e trascinarlo al form centro. Impostare le relative proprietà nella finestra Proprietà sulla destra.

4

Aggiungere un controllo "ADO" nel modulo. Impostare la proprietà "Visible" su "False".

5

Fare clic sul pulsante "Visualizza codice" in cima alla finestra di Esplora progetti per iniziare ad aggiungere codice. Nell'esempio che segue, i 50 stati degli USA verrà aggiunto nella casella combinata da una tabella di database. Quando il form viene caricato in fase di esecuzione, la casella combinata è riempita automaticamente. Vai all'evento "Form_Load" e Inserisci il codice simile al seguente:

Dim conn As New ADODB. Connessione
Dim rs As New ADODB. Recordset
Set conn = DBEngine (app. Path & "\dbDatabase.mdb")
Set rs = conn. OpenRecordset("tblStates")

Se rs. RecordCount > 0 Then
While Not rs. EOF
Con Combo1
. AddItem rs. Fields("USStateName")
Terminare con
. MoveNext
Loop
End If

6

Premere il tasto "F5" sulla tastiera per eseguire il programma.

7

Salvare il progetto Visual Basic facendo clic su "File" e poi "Salva progetto con nome" dal menu.