Visual Basic - Gargar imagenes al objeto Image

hola:
quisiera saber como cargar una imagen en el objeto image realizando una busqueda, estoy realizando un aplicativo con imagenes y hasta el momento cargo las imagenes asi:
tengo una lista de peliculas en un msflexgrid y cuando doy doble click a una fila capturo el codigo de una pelicula, ejemplo un codigo P0001, entonces le indico q se cargue la imagen con el nombre P0001 guardada en una carpeta en el image de la sgte. manera
variable fil guarda el codigo de la pelicula
if fil="P0001" then
image1.picture=loadpicture("c:\peliculas\P0001.jpg")
end if
if fil="P0002" then
image1.picture=loadpicture("c:\peliculas\P0002.jpg")
end if
if fil="P0003" then
image1.picture=loadpicture("c:\peliculas\P0003.jpg")
end if
.
.
.
y asi sucesivamente; quuisiera saber como hacer esto de otra forma.
Leonel Luna

puedes usar tambien el objeto ImageList que viene en el componente de 'Microsoft Windows Common Controls 6.0 (SP6)' y luego agrega las imagenes que necesitas que quedaran como en un arreglo, es decir, cada imagen tendra un index para ubicarla.

Hola Master no tengo mucho tiempo si me mandas un e-mail te lo hago mas claro pero es mas o menos asi (Una de las tantas maneras)

En vez de poner:

if fil="P0001" then
image1.picture=loadpicture("c:\peliculas\P0001.jpg")
end if

deberias poner
image1.picture=loadpicture("c:\peliculas\" & fil & ".jpg")

donde segun lo que lei "fil" tiene solo el nombre del archivo, por eso agrego la extencion "jpg"