[Resolvido]trocar de foto

Meus amigos, boa noite , estou tentando trocar de foto mais não consigo
o quero é : se a pasta não estiver a foto logo da empresa então o sistema puxa a foto "sem foto" se ela tiver então ela puxar a foto " logo da empresa.
para não ser manual, mas nãi consigo.

Código:

If Right(Application.CurrentProject.Path & "\Fotos\" = null then
     '  Me.imgFundo.Picture = Application.CurrentProject.Path & "\Fotos\" & "sem foto.jpeg"
   Else
       Me.imgFundo.Picture = ("C:\MEURECIBO\Fotos\sem foto.jpg")
       
       End If

end sub

ja tentei outras lógicas , mas não consigo

Abra o banco com a tecla shift pressionada e veja as instruções no VBA do formulario cadastro;

https://www.maximoaccess.com/t12925-cadastro-de-dados-de-detentos-com-4-fotos

Entre muitos outros que existem aqui.

obg, Jp, vou mexer como esse.
Cara,como você faz a transparência do access, sem pedir nenhum modulo