全部显示

返回一个 AcFileFormat 常量，表明指定项目的 Microsoft Access 版本格式。只读。

expression.FileFormat

expression     必需。返回“应用于”列表中的一个对象的表达式。

说明

可以使用 ConvertAccessProject 方法将 Access 项目从一个版本转换为另一个版本。

示例

该示例估算当前的项目，并显示一条用于标明文件格式对应的 Microsoft Access 版本的消息。

Dim strFormat As String

Select Case CurrentProject.FileFormat

    Case acFileFormatAccess2

        strFormat = "Microsoft Access 2"

    Case acFileFormatAccess95

        strFormat = "Microsoft Access 95"

    Case acFileFormatAccess97

        strFormat = "Microsoft Access 97"

    Case acFileFormatAccess2000

        strFormat = "Microsoft Access 2000"

    Case acFileFormatAccess2002

        strFormat = "Access 2002 - 2003"

End Select

MsgBox "This is a " & strFormat & " project."