微软是怎么获得文件的日期的？〉

Question

我用fso的f.createdate怎么结果和它显示的不一样呢？

Answer 1

Private Sub Command1_Click()
Dim fso As New FileSystemObject
Dim f As File, msg As String
Set f = fso.GetFile("c:\windows\pbrush.exe")
msg = "创建时间: " & f.DateCreated
msg = msg & vbCrLf & "访问时间: " & f.DateLastAccessed
msg = msg & vbCrLf & "修改时间: " & f.DateLastModified
MsgBox msg, 0, f.Name
End Sub