Cita:
Iniciado por bubilo Option Explicit
Dim base As Database
Dim tmuni As Recordset
Dim muni_detalle As Field
Private Sub Form_Load()
---Set base = OpenDatabase(App.Path & "\base.mdb")
---Set tmuni = base.OpenRecordset("SELECT DISTINCT descripcionmunicipios FROM municipios ORDER BY descripcionmunicipios")
---Set muni_detalle = tmuni.Fields("descripcionmunicipios")
---Do While tmuni.EOF = False
--- List1.AddItem muni_detalle
--- tmuni.MoveNext
---Loop
End Sub
no te olvides de agregar una referencia a ado 3.5 o 3.6 anda a proyectos-referencias alli lo vas a poder hacer..
la verdad no podría pedir más como decis pero este codigo es para un listbox para un datalist el posee sus propiedades para llenar y filtrar infomación pero buena tu respuesta le dirijo la otra pregunta a esta para que el forero vea que un mismo post estan las respuestas de datalist y listbox.
nos vemos..