Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
NombreTabla.MoveFirst
Do While Not NombreTabla.EOF
cont=cont+1
ListBox.AddItem cont & ")" & Chr(9) & NombreTabla!NombreCampo
NombreTabla.MoveNext
Loop
dime si te sirvio.