|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Banco de Dados)
|
|
 |
Título da Dica: Preenchendo um DataList ou DataCombo (OLEDB) via código
|
 |
|
|
|
Postada em 22/8/2007 por ghost_jlp
Com as referências do ADODB e sendo DBC um controle DataList ou DataCombo segue exemplo:
Dim CNN As ADODB.Connection
Dim RS As ADODB.Recordset
Private Sub Form_Load()
Set CNN = New ADODB.Connection
Set RS = New ADODB.Recordset
CNN.CursorLocation = adUseClient
CNN.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c: este.mdb"
RS.Open "tabela", CNN
Set DBC.RowSource = RS
DBC.ListField = "campo"
End Sub
até a próxima! :)
|
|
|
|
|
