[Resolvido]Como Carregar Imagem de um Campo tipo Anexo em um Controle tipo Imagem via VBA

boa tarde!

eu tenho uma tabela com algumas imagens salvas em um campo do tipo anexo. eu preciso carregar essas imagens em um controle do tipo imagem que está no formulário, via código VBA. alguma coisa está errado com o meu código.

segue o código usado:

Código:

Private Sub btnTesteImagem_Click()
    Dim registro As DAO.Recordset

    Set registro = Me.Recordset

    Me.minhaImagem.Picture = registro.Fields("imagem").Value

    Set registro = Nothing
End Sub

quando eu rodo o código acima, ele gera o erro #13 ("Tipos incompatíveis"). quando eu tento passar o FileData para a imagem, ele gera o erro #2176 ("A configuração desta propriedade está muito longa.").

Código:

Me.minhaImagem.Picture = registro.Fields("figura").Value.Fields("FileData").Value

fico grato por qualquer ajuda.

obrigado.

tudo beleza, Alvaro?

eu até sei que é possível exportar o arquivo da tabela e depois associá-lo ao controle do tipo imagem. eu queria mesmo era fazer isso direto no controle. to vendo que o melhor caminho é fazer isso que você está falando: salvar temporariamente e depois deletar o arquivo.

obrigado pela ajuda.

ps: gostaria de compartilhar com todos como fazer classe estática no VBA que não precisa ser declarada, onde eu uso como variáveis globais estáticas. é só escrever o nome da classe (em qualquer lugar do projeto) e apertar ponto (.) que aparecerão as propriedades na lista drop-down, retornando valores estáticos. muito bom.

MS Kid, resolveu sua questão?

Se sim, dê o tópico por finalizado editando e marcando-o como resolvido.

obrigado pessoal!