[Resolvido]formatar campo

Boa noite , nã consigo formatar o compo cpf . ja tentei mas não funciona , tipo 22222222222 e receber 222.222.222-22.
ele não devolve os numeros so fica no #

Código:

Private Sub CPF_AfterUpdate()
 Me.cpf = "###.###.###-##"
If Len(Me.cpf) < 11 Then
    MsgBox "O cpf contém 11 dígitos." & vbCrLf & "você digitou menos", vbInformation, "Consulmed"
    End If
End Sub


Boa noite Gilliard;

Tente dessa forma:

Código:

Private Sub CPF_AfterUpdate()
 Me.cpf.InputMask = "000\.000\.000\-00"
If Len(Me.cpf) < 11 Then
    MsgBox "O cpf contém 11 dígitos." & vbCrLf & "você digitou menos", vbInformation, "Consulmed"
    End If
End Sub

mas se eu colocar essa mascara ele não deixa a condição ser executada, aparece o mensagem do access

vou dar uma olhada sobre replace, pois esse não formatou

vou colocar esse como resolvido , o replace parece que limpa os pontos etc.. e funciona em um e outro campo ele dar erro