Salu2
No uso los listbox mas que para fechas pero = te sirve este ejemplo de combobox
ClientesCombo.AddItem " < SELECCIONE CLIENTE > "
AbreTabla.MoveFirst
While Not AbreTabla.EOF
ClientesCombo.AddItem AbreTabla!Nombre & " | " & Format(AbreTabla!IdCliente, "0000")
AbreTabla.MoveNext
Wend
ClientesCombo.AddItem " < TODOS LOS CLIENTES > " & " | " & "9999"
AbreTabla.Close
==================
Espero que te sirva.
