[RESOLVED] load first pic from file

[angelica]

hi im trying to load the first jpg from a folder and here's my code but I m getting error on the last line. Can someone pls correct me? ths


Dim Imagespath() As String = System.IO.Directory.GetFiles("C:\Underline_pics" & ("*.jpg"))
' Dim imagesindexes as New List(Of Integer)
frontpic.Image = Image.FromFile(Imagespath.IndexOf(0))

[Atheist]

The IndexOf method searches through an array to find the index of the thing you are searching for, which in this case is a 0. You have missed some parameters in the IndexOf method, causing some errors to show. Altough that doesnt matter now because I think that you just want to show the first picture in the array, and that would simply be:

Image.FromFile(Imagespath(0))

EDIT: Correct me if im wrong, but is Underline_pics a folder that contains the pictures? In that case you should provide that as first argument of the getfiles method, and the filetype to retrieve as second argument. Like so:

Dim Imagespath() As String = System.IO.Directory.GetFiles("C:\Underline_pics", "*.jpg")

[Atheist]

Did this work for you? In that case please mark thread as resolved

[angelica]

yes, your're right.

Now I need to load the 2,3,4,5 with a button click, how can I use. any examples ?

[stimbo]

Do you mean you want to change the image in the current picturebox with each button click?

Dim currentPic As Integer = 0 'Set variable
Dim Imagespath() As String = System.IO.Directory.GetFiles("C:\Underline_pics", "*.jpg")   'Load images into array
 
'Load 1st pic on form_load
frontpic.Image = Image.FromFile(Imagespath(currentPic))

Then under the button click you simply update the variable and load the next picture:

currentPic += 1 'Update
frontpic.Image = Nothing
frontpic.Image = Image.FromFile(Imagespath(currentPic)) 'Load next pic

If you have 5 more pictureboxes then you would simply add 5 lines of code adding them as you have done except with an index value of 1, 2, 3, etc...

[angelica]

hi stimbo,

many thanks works fine now