![]() |
DBCodDescrControllo associato ai dati ADO Combo+Label combinati |
![]() |
Caricamento dinamico dei dati dalla tabella Authors di BIBLIO.MDB |
Questo controllo associato ad un recordset ADO possiede due interessanti peculiarità che lo rendono molto utile in tutti quei casi in cui si deve mostrare a video dei dati nella forma codice/descrizione e in tutti quei casi in cui la lista dei possibili valori selezionabili risulta molto lunga.
Infatti questo controllo oltre a mostrare in un combo i codici mostra in una label associata la descrizione relativa al codice selezionato.
Inoltre il caricamento della lista avviene in modo asincrono cosi che già da subito si può scorrere i dati presenti nella combobox mentre i dati vengono caricati.
Infine, caratteristica non da poco, il controllo Combo è a ricerca incrementale in quanto deriva direttamente dal controllo EmiComboboxInc.
Come si vede dall'esempio, anche se il recupero dei dati non è stato completato dal database, è comunque possibile scorrere la lista dei dati già recuperati e selezionare i valori relativi. L'esempio a lato è stato ottenuto molto semplicemente tramite il seguente codice Visual Basic:
' Create connection to db BIBLIO.MDB
Set Con = New ADODB.Connection
With Con
.Provider =
"Microsoft.Jet.OLEDB.4.0"
.Properties("Data
Source") = "c:\program files\microsoft
" & _
"visual
studio\vb98\biblio_2000.mdb"
.Open
End With
' Link ADO connection to DBCodDescr Control
Set db.DBConnection = Con
With db
' Set SQL query to execute
.SQL = "select au_id,author from authors"
' bind label to author column
.LabelBinding =
"author"
' bind combo to id author column
.ComboBinding =
"au_id"
' start loading data...
.Refill
End With