ola amigos

tenho um pequeno projeto que salva imagen em um banco de dados access  mais estou com um plobrema pois nao consigo visualisar a imagen  no programa

este e os codigos que eu estou usando para mostra os dados que esta no access

 

Private Sub Mostrar_Dados()
    'aqui esta certo  
    txtcodigo.Text = IIf(IsNull(tb("codigo")), "", tb("codigo"))

    'aqui esta dando um erro

    Image1.DataField = IIf(IsNull(tb("foto1")), "", tb("foto1"))
       
End Sub