Visual Basic - Ayuda con Commondialog

Hola programadores

Lo que necesito es buscar una carpeta que hay en mi pc o en otra pc y que la ruta me la ponga en un text para luego guardarla

Estaba usando un commondialog pero no si es lo mas adecuado

Ayudenme please
Graxias

CON COMMAND DIALOG QUE EN ESTE CASO SE LLAMA CDDOCUMENTO:

On Local Error Resume Next
Dim sArchivo As String

txtNombreDocumento = ""

'Especificar las extensiones a usar
cdDocumento.DefaultExt = "*.crd"
cdDocumento.Filter = "Microsoft Excel (*.xls)|*.xls|Archivos de Texto (*.txt)|*.txt|Microsoft Word (*.doc)|*.doc"
cdDocumento.ShowOpen
If Err Then
Else
sArchivo = cdDocumento.FileName
End If

txtNombreDocumento.Text = sArchivo

ESPERO TE AYUDE LISSI :)

Lo que necesito es solo la direccion de la carpeta no quiero escoger ningun documento solo quiero darle la ruta de una carpeta sin necesidad de tener que escoger una carpeta . Creo que commond dialgo me obliga a darle un documento y no solo escoger una carpeta

pofrias poner
text1.text=commondialog1.filename


ChaRLinux Corporation

te pase por mail un modulo que te permite seleccionar una carpeta