ابتدا باید از منوی Project، گزینه ...References رو انتخاب كنید و بعد در كادر باز شده، Microsoft Scripting Runtime رو فعال كنید.

حالا اشیاء جدیدی به نامهای FileSystemObject و File و Folder و Drive و TextStream به پروژه شما اضافه میشه.

1- FileSystemObject : برای كار با سیستم فایل به كار میره.

2- File : اطلاعات خاصی رو درمورد فایلها نشون میده.

3- Folder : اطلاعات خاصی رو درمورد فولدرها نشون میده.

4- Drive : اطلاعات خاصی رو درمورد درایوها نشون میده.

5- TestStream : میتونه روی فایلهای متنی ترتیبی كار كنه و كارهایی ازقبیل خوندن و نوشتن و... انجام بده.

حالا جواب مورد نظر شما :

اول از همه، به روش گفته شده، Reference به نام Microsoft Scripting Runtime رو به پروژه اضافه كنید. حالا فرض كنید میخواهید با كلیك روی دكمه Command1، تاریخ ایجاد فایل 3DSMAX.TXT از درایو :C رو به دست بیارید. برای این كار، رویداد كلیك این دكمه رو به صورت زیر در بیارید، دستورات زیر رو بنویسید:

Private Sub Command1_Click()
    Dim FSO1 As New FileSystemObject
    Dim File1 As File
    Set File1 = FSO1.GetFile("C:\3DSMAX.TXT")
    MsgBox (File1.DateCreated)
End Sub

با این كار، ابتدا یك شئ از نوع FileSystemObject و یك شئ از نوع File ایجاد میشه. بعد با دستور Set، فایل C:\3DSMAX.TXT توسط FileSystemObject گرفته میشه و دراختیار File گذاشته میشه. سپس با خاصیت DateCreated، تاریخ ایجاد اون، نمایش داده میشه.

به روش مشابه، میتونید اطلاعات دیگری رو در مورد Fileها، Folderها و Driveهای سیستمتون در بیارید.

امیدوارم كه مشكلتون برطرف شده باشه.