Explorador de archivos

[Lionheart12]

Necesito navegar por la pc, osea el disco duro, como hago esto:
Tngo un DriveList, un DirList y un FileList. Como se hace para que se actualizen de acuerdo al otro. Osea el dirlist empieza mostrandote los directorios del C:, si cambiase en el DriveList
a D:  como hago para q se actualize el DirList?? y lo mismo con el FileList, q al cambiar el DirList se actualize el FileList. Se entiende?? como un navegador.
Espero su ayuda aca veo muy buenas respuestas 

[~~]

Pues muy simple:

Código [Seleccionar] Expandir

Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

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

[Mad Antrax]

Aqui tienes el código:

Código [Seleccionar] Expandir

Private Sub File1_Click()
    MsgBox File1.Path & "\" & File1.FileName
End Sub

Private Sub Form_Load()
    Drive1.Drive = Environ("HOMEDRIVE")
End Sub

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

Private Sub Dir1_Change()
   File1.Path = Dir1.Path
End Sub


Y Como siempre un ejemplo adjunto al post (solo usuarios registrados)

Saludos!!

EDIT: Se me adelantaron otra vez