Lo que pasa es que estoy desarrolando un Software para una Tienda, en una de las pantallas mostrara unas imagenes de algunos productos, las cuales seran escojidas al azar a cada cierto tiempo. Como le hago?

Crei que era algo asi?

Dim strFotos as String
strFotos=Array(Foto1,Foto2,Foto3)
Image1.Picture=LoadPicture(Randomize(DirectorioFotos & "\" & strFotos & ".jpg"))


pero no me da resultados

Utiliza el ImageList, es la mejor opcion y la mas comoda, ya q trabajas con su indice... En los componentes busca  Microsoft Windows Common Controls 6.0 )si no me equivoco=

Objeto.Picture=ImageList.Listimage(indice).picture

Saludos !