relacionar una imagen con dirlist

jaimito
01 de Noviembre del 2005
como hago para mostrar una imagen en un cuadro al seleccionar en un dirlist.. de antemano mil gracias

mvallejos
01 de Noviembre del 2005
Para empezar, el DirListBox solo muestra carpetas, te haría falta un FileListBox que se complemente y te muestre la lista de archivos de imagen de una ruta seleccionada desde el DirListBox

En el Evento Click del DirListBox pones lo siguiente

File1.Path = Disr1.Path
File1.Pattern = "*.jpg , *.bmp, *.gif"
File1.Refresh

En el evento Click del FileListBox

Dim Archivo as String
Archivo = dir1.Path & "" & file1.List(File1.ListIndex)
Picture1.Picture = LoadPicture(Archivo)

Saludos