Visual Basic - Carpetas ocultas

Como le puedo hacer para que una lista Dir me muestre las carpetas con atributo de oculto, pues en la lista File si se pueden poner propiedades para mostrar archivos con atributos pero de nada me sirve si las carpeta ocultas no se muestran.

Cuando utilizas Dir el segundo parámetro se utiliza para especificar el tipo de archivos o directorios que quieres localizar. Este parámetro puede ser una combinación de los siguientes valores:

vbAlias
vbArchive
vbDirectory
vbHidden
vbNormal
vbReadOnly
vbSystem
vbVolume

Para combinar valores, debes utilizar el operador Or. Por ejemplo, si quieres localizar directorios ocultos, tendrás que especificar algo así:

Dim s As String

s = Dir("c:\ruta\*.*", vbDirectory Or vbHidden)

Me referia al Dir objeto, osea a la lista dir que muestra las carpetas de una unidad y es que no tiene ninguna propiedad como el File, pero de todos modos gracias pues no sabia que se puedieran combinar los valores del Dir, esto me va a servir para un programilla que hice hace poco y que busca archivos.