' Cotruye un Visualizador de Imagenes con Solo 9 Lineas de Codigo,
' Si lo contruyes con Visual Basic 5.0 Te permitira ver Imagenes BMP, GIF, JPG, ICO, WMF

' Crea Un Nuevo Proyecto, y al Form1 ponle los siguientes Objetos :
' Un Picture con su Propiedad Resize =True  (Picture1)
' Un FilelistBox (File1)
' Un DirListBox (Dir1)
' Un DriveLisBox (Drive1)
' Un TextBox con su Propiedad Text = *.BMP  (Text1)
' Acomodalos como quieras dentro del Form1, Dejando espacio sufucuente para  el Picture1.

'Comienza el Codigo :
'En el Evento Load del Form1 Pon :
F = Text1

'En el Evento Change del Text1 Pon :
F = Text1

'El Evento Change del Drive1 Pon :
Dir1=Drive1

'El Evento Change del Text1 Pon :
File1=Text1

'El Evento Change del Dir1 Pon :
File1=Dir1

'El Evento Click del File1 Pon :
On Error GoTo ErrorF:
    Set Picture1 = LoadPicture(Dir1 & " \" & File1)
    Exit Sub
ErrorF:
Resume Next