Propriedade CurrentProject.FileFormat (Access)
Retorna uma constante AcFileFormat indicando o formato de versão do Microsoft Access do projeto especificado. Somente leitura.
Sintaxe
expressão. Fileformat
Expressão Uma variável que representa um objeto CurrentProject .
Comentários
Use o método ConvertAccessProject para converter um projeto do Access de uma versão para outra.
Exemplo
Este exemplo avalia o projeto atual e exibe uma mensagem que indica a qual verão do Microsoft Access seu formato de arquivo corresponde.
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"
Case acFileFormatAccess12
strFormat = "Microsoft Access 2007"
End Select
MsgBox "This is a " & strFormat & " project."
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.