Error de compilación en Access, no se esperaba un módulo

Intentando aplicar códigos publicados, Access me presenta "error de compilación, se esperaba una variable o procedimiento, no un módulo"

Dando por hecho que no se trata de un error en los códigos (no he visto comentarios al respecto), a ver si alguien puede ayudarme con esto. Tal vez un ejemplo sirva para aclarar los demás; en este último caso, para validar la letra del DNI acudí a el código siguiente:

Function LetraNif(strA As String) As String 
Dim cCADENA As String 
Dim cNUMEROS As String 
Dim strT As String, strB As String 
Dim a#, NIF#, b#, c# 
Dim i As Integer 
LetraNif = '' 
cNUMEROS = '0123456789' 
cCADENA = 'TRWAGMYFPDXBNJZSQVHLCKE' 
strT = Trim$(strA) 
If Len(strT) = 0 Then Exit Function 
strB = '' 
'---Dejar solo los numeros...
For i = 1 To Len(strA) 
If InStr(1, cNUMEROS, Mid$(strA, i, 1)) Then 
strB = strB + Mid$(strA, i, 1) 
End If 
Next 
strA = strB 
a# = 0 
NIF# = Val(strA) 
Do 
b# = Int(NIF# / 24) 
c# = NIF# - (24 * b#) 
a# = a# + c# 
NIF# = b# 
Loop While b# <> 0 
b# = Int(a# / 23) 
c# = a# - (23 * b#) 
LetraNif = Mid$(cCADENA, c# + 1, 1) 
End Function

(Después de cambiar las comillas simples por las dobles -porque me daba error-, en la ventana de depuración funcionaba perfectamente: Print LetraNIF ('1623532') = P...)

En el formulario, al evento después de actualizar del cuadro de texto donde va el número del DNI el procedimiento

Private Sub DNI_AfterUpdate () 
Letra = LetraNIF (DNI) 
End Sub

Es el que me presenta el mensaje de error, deteniéndose el vba en LetraNIF