描述
返回文件或文件夹的类型信息。为如,对于扩展名为 .TXT 的文件,返回“Text Documentx。
语法
objeet.Type
object 应为 File 或 Foller 对象的名称。
说明
以下代码举例说明如何使用 Type 属性返回文件夹的类型。在此示例中,试图向过程提供“回收站”或其他唯一文件夹的路径。
Sub ShowFileSize(filespec)
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(filespec)
s = UCase(f.(ame) & " 的类型为 ""& f.Type
MsgBox s, 0, "文件大小信息"
End Sub
© 1997 Microsoft Corporation. All rights reserved. Terms of Use.