Sopmac
|
RIO DE JANEIRO
RJ - BRASIL
|
|
Postada em 25/08/2005 08:20 hs
Bom dia Turma! Desejo colocar em uma ComboBox os dados de uma tabela do Access para que possam ser selecionados. Como faço isto? Outra coisa: Como faço para carregar relatórios do Acces pelo VB?
Equipe Sopmac
|
|
|
|
|
|
|
|
Postada em 25/08/2005 08:32 hs
você pode fazer assim (evento load do form): Dim rst As Recordset
Set rst = vgdb.OpenRecordset("SELECT Produtos.Codigo, Produtos.Nome From Produtos ORDER BY Produtos.Codigo;")
If rst.RecordCount > 0 Then
Do While Not rst.EOF
Combo1.AddItem rst!Nome
rst.MoveNext
Loop
End If
rst.Close
Set rst = Nothing
|
|
|
|
Gilson Filho
não registrado
|
|
Postada em 27/08/2005 11:14 hs
esse codigo é para ADO ou DAO? |
|
|
|
