Access - Contar Registros

Hola:
Tengo es un formulario con un cuadro de lista en el que aparecen registros de una consulta que varia según unos criterios que yo voy cambiando. Por los tanto, los registros que aparecen en el cuadro de lista tambien. Lo que quiero es contar los que aparecen cada vez.

Hola
Mediante codigo VBA puedes saber cuatos elementos tiene una lista por ejemplo podrias colocar un boton y en el el siguiente codigo

msgbox TuCuadroDeLista.ListCount

Lo anterior te mostraria un mensaje con el munero de elementos.

Saludos

http://theemulator.tk

En un cuadro de textoIndependiente, en origen del control Pon:
=NombreLista.ListCount
En el evento después de actualizar del cuadro de lista pon:
Me.TextoIndependiente.Requery
Te lo envio porque los cuadros de mensajes son una lata sí estas consultando continuamente el cuadro de lista.

Muchas Gracias a mi menda. Funciona perfectamente y es justo lo que queria hacer.
Necesito ayuda en otra cosa. Me pasa algo muy raro con este Formulario. Tengo otro cuadro de Lista donde aparecen nombres. Un cuadro de texto justo encima donde yo introduzco letras para seleccionar los nombres del cuadro de lista de manera que se acorte la lista a medida que introduzco letras. El código que introduje en "Al Cambiar " en el cuadro de Texto es el siguiente:
Private Sub Texto0_Change()
If Texto0.Text = "" Then
Lista2.RowSource = "SELECT" & "[Autores.NombreAutor]" & "FROM Autores"
Else
Lista2.RowSource = "SELECT" & "[Autores.NombreAutor]" & " FROM Autores " & "WHERE [Autores.NombreAutor] LIKE '*" & Texto0.Text & "*' "
End If
Lista2.Requery
End Sub

Lo que me pasa es que fuciona bien en el momento que lo hago por primera vez, pero al cerrar el programa y volver a abrirlo ya no funciona y no se por que leches no funciona.
Te agradeceria mucho tu ayuda.

Pues sí que es raro. He probado tu código y funciona perfectamente, cerrando la base de datos y volviendola a abrir, y cerrando access y volviendolo a abrir, y no he tenido ningún problema. Solo se me ocurre que compactes la base de datos, por si hubiera algún problema interno.

Puedo enviarte la base de datos entera para ver que puedes encontrar mal?

Bueno enviamela, pero ten paciencia.