全部显示

FileFormat 属性

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

expression   必需。返回“Applies To”列表中的一个对象的表达式。

说明

可以使用 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"
End Select

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