Função LOF

Nota: A função, método, objeto ou propriedade descrito neste tópico é desativada se o Microsoft Jet Expression Service estiver a funcionar em modo sandbox, o que impede a avaliação de expressões potencialmente inseguras. Para obter mais informações sobre o modo sandbox, procure "modo sandbox" em Ajuda.

Devolve um Long representando o tamanho, em bytes, de um ficheiro aberto usando a declaração Open.

Sintaxe

LOF( número de ficheiros)

O número de ficheiros necessárioargumento é um Número Inteiro que contém um número de ficheiro válido .

Nota:  Utilize a função FileLen para obter o comprimento de um ficheiro que não esteja aberto.

Exemplo

Nota: Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.

Este exemplo utiliza a função LOF para determinar o tamanho de um ficheiro aberto. Este exemplo pressupõe que TESTFILE é um ficheiro de texto que contém dados de amostra.

Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file.
FileLength = LOF(1) ' Get length of file.
Close #1 ' Close file.

Precisa de mais ajuda?

Aumente os seus conhecimentos do Office
Explore as formações
Seja o primeiro a obter novas funcionalidades
Adira ao Office Insider

As informações foram úteis?

Obrigado pelo seu feedback! Parece que poderá ser benéfico reencaminhá-lo para um dos nossos agentes de suporte do Office.

×