Visual Basic - Directorios y ficheros en un treeview o Listview

Hola
quisiera saber como se muestra los directorios y los ficheros en un treeview o listview
Gracias

Te envío algunas cosas parecidas, el formulario permitía seleccionar una ruta completa e incluso agregar directorios nuevos si te pierdes mucho mandamé un correo y te envío el formulario completo

Private Sub cmdNew_Click()
bName = InputBox("Write the name for the new Folder", " New Folder...")

If bName <> "" Then
MkDir Dir.Path + "\" + bName
Dir.Path = Dir.Path + "\" + bName
End If
End Sub

Private Sub cmdOK_Click()
If Dir.Path = strPath & "IIE" Or Dir.Path = strPath & "FAP" Or Dir.Path = strPath & "DAG" Or Dir.Path = strPath & "RGA" Or Dir.Path = strPath & "CONSUL" Then
MsgBox "You can not select this path. Please select a diferent one", vbCritical, "Path selection... "
Exit Sub
Else
frmMarcoPropu.txtBrowsePropu.Text = Dir.Path
End If

Unload Me
End Sub

Private Sub Dir_Change()
Me.Caption = Dir.Path
End Sub

Private Sub Drive_Change()
On Error GoTo archivoerror
Dir.Path = Drive.Drive
Dir.Refresh
Me.Caption = Dir.Path

archivoerror:
MsgBox "The unit is not available...", vbCritical, "Error..."
End Sub

Por favor no se si pudieras ayudarme con un trabajo de Visual Basic, necesito el codigo para realizar una aplicacion similar al Explorador de Windows