Visual Basic - Explorar carpetas y archivos con WebBrowser

Se trata de un explorador como el que viene con windows

Al poner :
Private Sub WebBrowser1_GotFocus()
Text1 = WebBrowser1.Document.FocusedItem.Name
End Sub

WebBrowser1.Document.FocusedItem.Name: Nos dice el nombre del archivo o carpeta seleccionado

El problema es que quiero pulsar sobre cualquier carpeta o archivo y sacar la ruta c:/xxxxx

Alguien sabe como hacerlo, mis conocimientos son escasos.

Gracias