Enkel image viewer?

[akristina92]

Hei.

Driver og prøver å finne ut av noe dritt nå..

Skulle lage en enkel image viewer.

Men så var såklart noe feil.

Har ikke peiling på hva som kan være feil!

Se på dennne koden her:

Private Sub lala_Click()
CommonDialog1.Filter = "bmp"
CommonDialog1.DefaultExt = "bmp"
CommonDialog1.ShowOpen
Picture1.Picture = CommonDialog1.FileName
End Sub

Endret 27. november 2004 av DiskSpace10GB

[aadnk]

Jeg tror du må gjøre det på følgende måte for å få det til å funke:

 

CommonDialog1.DefaultExt = "bmp"
CommonDialog1.Filter = "bmp|*.bmp|jpg|*.jpg"
CommonDialog1.ShowOpen

Set Picture1.Picture = LoadPicture(CommonDialog1.FileName)