Access - codigo para insertar imagen en un camp

necesito codigo para insertar una imagen en un campo desde un formulario, ya sea pulsando un boton o haciendo click en el objeto
por ejemplo:
Private Sub CmdAgregarImagen_click( )
***Aqui no se que poner***
End Sub
Muchas Gracias

Hola

He aqui una solucion que automatiza el proceso de incrustado:

Dim sFoto as string

sFoto = "C:\Mis Imagenes\FOTO.BMP"
' * Verifica que la foto exista, de no existir no hace nada
If Len(Dir(sFoto)) > 0 Then
' * Para poder usar el campo desbloqueamos
Me.FOTO.Locked = False
' * No hay OLE Incrustado?
If Me.FOTO.OLEType = acOLENone Then
' *Si vas a usar solo BMP o PCX no hace llamar la clase indicada
' *en la siguiente linea, en cambio para usar JPG o GIF debes
' *usar la clase correspondiente por ejemplo Photo Edit
' *Me.FOTO.Class = "Paint.Picture"
' * Apuntamos a la imagen
Me.FOTO.SourceDoc = sFoto
' * Le decimos que es incrustado
Me.FOTO.OLETypeAllowed = acOLEEmbedded
' * Actualizamos nuestro campo
Me.FOTO.Action = acOLECreateEmbed
Else
' * El campo tiene un OLE que ha sido creado antes
' * Esto es util si tienes una foto mas reciente que quieras
' * actualizar en tu base de datos
Me.FOTO.SourceDoc = sFoto
' * Entonces solo actualizamos la imagen
Me.FOTO.Action = acOLEUpdate
End If
' * Bloqueamos para no editarlo con el boton derecho del raton
Me.FOTO.Locked = True
End If
Este proceso lo incluyes por ejemplo en un evento en un boton personalizado o donde tu creas conveniente

Saludos, espero que te sirva el ejemplo