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.