Mostrar texto en form según valor de una consulta

Voy a suponer lo siguiente:
- El formulario donde trabajas lo llamaré FDatos
- La consulta que utilizas la llamaré CDatos
- El cuadro de texto donde se te recogerá el texto lo llamaré [txtPendientes]
- El cuadro de texto que te indicará el número de pendientes lo llamaré [txtNumPendientes]
Doy por supuesto que estos dos textbox los tienes en el formulario.
Lo que tienes que hacer es lo siguiente:
1.- Creas un módulo estándar y le asignas el siguiente código:
...
Public Function numPdtes() as long
    Dim dbs as DAO.Database
    Dim rst as DAO.Recordset
    Dim vNum as Long
    Set dbs=Currentdb
    Set rst=dbs.openrecordset("CDatos")
    numPdtes=rst.Recordcount
    rst.Close
    dbs.Close
    Set rst=nothing
    Set dbs=nothing
End function
...
A ese módulo lo puedes llamar, por ejemplo, CuentoPendientes
Deberás tener instalada la biblioteca <Microsoft DAO 3.6 Object Libray>
2.- Abres tu formulario FDatos en vista diseño y sacas sus propiedades. Te vas a la pestaña Eventos->Al activar registro y generas el siguiente código:
...
Private Sub...
    me.[txtNumPendientes].value=numPdtes()
    If me.[txtNumPendientes].value=0 then
        me.[txtNumPendientes].visible=false
        me.[txtPendientes].visible = false
    Else
        me.[txtNumPendientes].visible=true
        me.[txtPendientes].visible=true
        me.[txtPendientes].value= "Tienes modificaciones pendientes"
    End if
End sub
...
Recuerda que debes cambiar en los códigos los nombres que yo he supuesto por los que tú tienes en tu BD.
A ver si hemos acertado con la solución. Si tienes algún problema me comentas.