Windows Scripting Host
ya no programo en vb pero puedes revisar esto
http://www.latiumsoftware.com/es/visual-basic/0002.php
tambien este ejemplo (no se si correra, :p revisale )
Dim fso As FileSystemObject, oFile As File
Set fso = New FileSystemObject
Set oFile = fso.GetFile("C:\archivosql.txt")
MsgBox oFile.DateCreated
MsgBox oFile.DateLastModified
solo asegurate de agregar a tu proyecto una referencia al Windows Script Host Object Model.
saludos