Visual Basic - Obtener Atributos de un fichero

Deseo saber como obtener los atributos de un fichero en Visual Basic.
Si puedes me mandas un ejemplo.
Gracias

1.- Tienes q hacer una referencia en el proyecto a "MicroSoft Scripting Runtime"(Menu.:Proyecto,Opcion Referencias)

Dim ObjFileSystem As FileSystemObject
Dim Fichero As File
Set ObjFileSystem = New FileSystemObject
Set Fichero = ObjFileSystem.GetFile("c:\kk.txt")
Debug.Print Fichero.DateCreated
Debug.Print Fichero.DateLastAccessed
Debug.Print Fichero.DateLastModified
Debug.Print Fichero.Drive
Debug.Print Fichero.Name
Debug.Print Fichero.ParentFolder
Debug.Print Fichero.Path
Debug.Print Fichero.ShortName
Debug.Print Fichero.ShortPath
Debug.Print Fichero.Size
Debug.Print Fichero.Type

Estimado amigo:
En www.ambsoftware.com encontrarás un ejemplo que te muestra cómo hacerlo.
Para localizarlo te recomiendo que utilices el buscador de recursos de la página principal y escribas en la casilla la palabra "atributo".
Espero que esta información te sirva de ayuda.
Un saludo