Visual Basic - Moverme por un directorio de imágenes

Hola de nuevo,,

estoy haciendo una aplicación y necesito como poder avanzar por un directorio viendo fotos, es decir, como si fuese un visor de imágenes y cuando yo le doy a "siguiente" que me cargue la fotografía siguiente de ese directorio en una formulario y lo mismo con anterior.

Saludos

Yo usaria 3 controles para buscar el directorio con las imagenes

DriveListBox
DirListBox
FileListbox

en una variable sumaria o restaria 1 , teniendo en cuenta el filelistcount (la cantidad de imagenes en el directorio elegido) para ir mostrando las imagenes en un picture o image

'-----------------------------------------------------------------------------------------------------------

Private Sub Command1_Click()
On Error Resume Next
If Val(Text1.Text) = 0 Then
Text1.Text = File1.ListCount
Else
Text1.Text = Val(Text1.Text) - 1
End If
Image1.Picture = LoadPicture(Dir1.Path & "\" & File1.List(Val(Text1.Text)))
File1.Selected(Val(Text1.Text)) = True
End Sub

Private Sub Command2_Click()
On Error Resume Next
If Val(Text1.Text) = File1.ListCount Then
Text1.Text = "0"
Else
Text1.Text = Val(Text1.Text) + 1
End If
Image1.Picture = LoadPicture(Dir1.Path & "\" & File1.List(Val(Text1.Text)))
File1.Selected(Val(Text1.Text)) = True
End Sub

Private Sub Dir1_Change()
File1.Path = Dir1.Path
Text1.Text = File1.ListCount
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub