cs_EXOCET
Messages postés37Date d'inscriptionmardi 14 mai 2002StatutMembreDernière intervention 3 septembre 2002 6 juil. 2002 à 10:26
salut
je suis pas sure mais a tu essayé de mettre :
Private Sub File1_Click()
File1.Pattern = "*.bmp and *.jpg" '<----------la modif
SelectedFile = File1.Path & "" & File1.FileName
Image1.Picture = LoadPicture(SelectedFile)
End Sub