📄 vb_att10b.dat
字号:
语法
----
object.DateLastAccessed
object 总是一个 file 或 Folder 对象。
说明
----
下面的代码用一个文件举例说明了 DateLastAccessed 属性的用法:
Sub ShowFileAccessInfo(filespec)
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(filespec)
s = UCase(filespec) & vbCrLf
s = s & "Created: " & f.DateCreated & vbCrLf
s = s & "Last Accessed: " & f.DateLastAccessed & vbCrLf
s = s & "Last Modified: " & f.DateLastModified
MsgBox s, 0, "File Access Info"
End Sub
重点 这种方法由其下一级操作系统决定其行为。如果操作系统不支持提供时间信息,则没有返回信息。
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -