fai così:
incolla questo codice in nuovo progetto:

interfaccia grafica:
nel form immetti una label1, 2 pulsanti e un controllo image1
e il componente commondialog, per avere il componente nel tuo progetto
clicca sul menu progetto e poi su componenti e spunta la voce Microsoft common dialog control e poi clicca su applica e poi su OK

'--------taglia da quì-------------
Private Sub Command1_Click()
With CommonDialog1
Label1.Caption = ""
Image1.Picture = LoadPicture("")
.Filter = "File BMP|*.bmp" _
& "|" & "File GIF|*.gif" _
& "|" & "File JPG|*.jpg" _
& "|" & "File ICO|*.ico" _
& "|" & "File CUR|*.cur" _
& "|" & "File WMF|*.wmf" _
& "|" & "Tutti i file|*.*"
.DialogTitle = "Apri"
.ShowOpen
If .FileName <> "" Then
Image1.Picture = LoadPicture(.FileName)
Label1.Caption = .FileName
Command2.Enabled = True
Else
Image1.Picture = LoadPicture("")
Label1.Caption = ""
Command2.Enabled = False
End If
End With
End Sub

Private Sub Command2_Click()
If Label1.Caption = "" Then
Else
Image1.Picture = LoadPicture("")
Label1.Caption = ""
Command2.Enabled = False
End If
End Sub
'-------a quì----------------------

studia il listato e adattalo come vuoi:
di okait60@katamail.com
freeware

link
homepage http://%77%77%77%2e%74%77%6f%72%6b%2e%69%74/
forum http://%77%77%77%2e%74%77%6f%72%6b%2...um/default.asp

buon lavoro