Applies ToAccess para Microsoft 365 Access 2021 Access 2019 Access 2016

Observação: A função, método, objeto ou propriedade descrita neste tópico será desabilitada se o Serviço de Expressão de Jato da Microsoft estiver em execução no modo de área restrita, o que impede a avaliação de expressões potencialmente inseguras. Para obter mais informações sobre o modo de área restrita, procure por "modo de área restrita" na Ajuda.

Retorna um Long especificando a posição atual de leitura/gravação em um arquivo aberto.

Sintaxe

Loc( filenumber )

O número de arquivos necessárioargumento é qualquer inteiro válido número do arquivo.

Comentários

O seguinte descreve o valor retornado para cada modo de acesso de arquivo:

Modo

Valor de retorno

Aleatório

Número do último registro lido ou gravado no arquivo.

Seqüencial

Posição de byte atual no arquivo dividido por 128. No entanto, as informações retornadas pela Loc para arquivos sequenciais não são usadas nem necessárias.

Binário

Posição da última leitura ou escrita do byte.

Exemplo

Observação: Exemplos a seguir demonstram o uso dessa função em um módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.

Este exemplo usa a função Loc para retornar a posição atual de leitura/gravação em um arquivo aberto. Este exemplo pressupõe que TESTFILE é um arquivo de texto com algumas linhas de dados de exemplo.

Dim MyLocation, MyLine' Open file just created.Open "TESTFILE" For Binary As #1' Loop until end of file.Do While MyLocation < LOF(1)        ' Read character into variable.    MyLine = MyLine & Input(1, #1)        ' Get current position within file.    MyLocation = Loc(1)        ' Print to the Immediate window.    Debug.Print MyLine; Tab; MyLocationLoopClose #1    ' Close file.

Precisa de mais ajuda?

Quer mais opções

Explore os benefícios da assinatura, procure cursos de treinamento, saiba como proteger seu dispositivo e muito mais.

As comunidades ajudam você a fazer e responder perguntas, fazer comentários e ouvir especialistas com conhecimento avançado.