vb_att13b.dat

来自「C++指令字典 一个方便的软件 用于C++指令的查询」· DAT 代码 · 共 22 行

语法
----
object.Drive

object 总是一个 File 或 Folder 对象。


说明
----
下面的代码举例说明了 Drive 属性的用法：

Sub ShowFileAccessInfo(filespec)
    Dim fs, f, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFile(filespec)
    s = f.Name & " on Drive " & UCase(f.Drive) & 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