Se billede...

Image1.Picture = LoadPicture("c:\test.jpg")

Fandt selv ud af det...

Private Sub File1_DblClick()
Image1.Picture = LoadPicture(Dir1.path & ("\") & File1.FileName)
End Sub

Men sjh får point for "LoadPicture"

/Bjarke

Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

Private Sub File1_Click()
Image1.Picture = LoadPicture(File1.Path & "\" & File1.FileName)
End Sub

Private Sub Form_Load()
File1.Pattern = "*.jpg; *.gif"
End Sub

Kunne må ske give dig ideen?