Luego de una larga ausencia, lo prometido es deuda. He vuelto… y en esta oportunidad les traigo algo que siempre me preguntan. ¿como hago para insertar una imagen en un PictureBox sin hacerlo por las propiedades del Proyecto?. Bueno, realmente es muy fácil.  Solo deben crear un proyecto nuevo, que para efectos prácticos quede mas o menos asi:

y el código para que cargue la imagen seria el siguiente:

PUBLIC SUB BtnCerrar_Click()

ME.Close

END

PUBLIC SUB BtnCargar_Click()
DIM Himagen AS String

Himagen = User.Home & “/proyectosgambas/fotoBD/fotos/dsc00447.jpg”
CajaFoto.Picture = Picture[Himagen]

END

si quieres que salga un dialog para que puedas seleccionar la imagen que tu quieras, debes hacer algunas modificaciones que incluyen agregar el siguiente codigo, y ajustarlo al ya existente.

Dim Ruta as String                           (declaras una variable tipo string)
Dialog.OpenFile                              (esto te abre el navegador para que selecciones tu imagen)
Ruta=Dialog.Path                             (almacena en la variable la ruta y archivo seleccionado en el navegador)
picturebox.picture=Picture[Ruta]    (coloca en el objeto picturebox la imagen que seleccionaste)

Ahora si lo quieres desde una base de datos…. bueno eso te lo dejo a tu inmaginacion, ya con esto tienes las herramientas necesarias para hacerlo… que les sea de provecho.