Compartilhar via


Função Loc

Retorna um valor Long especificando a atual posição de leitura/gravção dentro de um arquivo aberto.

Public Function Loc(ByVal FileNumber As Integer) As Long

Parâmetros

  • FileNumber
    Obrigatório.Qualquer número Integer válido de arquivo

Exceções

Tipo de exceção

Número de erro

Condição

IOException

52

FileNumber não existe.

IOException

54

Modo de arquivo é inválido.

Ver a coluna " número de erro " se você estiver atualizando aplicativos Visual Basic 6.0 que usam manipulação de erros não estruturada.(Você pode comparar o número do erro com a Propriedade do Número (Erro de objeto).) Entretanto, quando for possivel, você pode considerar substituir tal controle de erro por Visão Geral sobre a Manipulação Estruturada de Exceções para o Visual Basic.

Comentários

A função Loc é baseada no zero ; usá-la para obter o primeiro byte num arquivo irá retornar 0.

A função Loc é fornecida para compatibilidade com versões anteriores e pode impactar a performance.Para aplicações novas, o objeto My.Computer.FileSystem fornece melhor performance.Para obter mais informações, consulte Access de Arquivo com o Visual Basic.

A tabela a seguir descreve os valores retornados para cada modo de acesso em arquivos.

Modo

Valor de Retorno

Random

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

Sequential

Posição de byte corrente no arquivo dividida por 128.No entanto, as informações retornadas por Loc para arquivos seqüenciais não é usadas nem necessárias.

Binary

Posição do último byte lido ou gravado.

Exemplo

Essa exemplo usa a função Loc para retornar a atual posição de leitura/escrita dentre de um arquivo aberto.Esse exemplo assume que MyFile é um aquivo de texto com algumas linhas com dados de teste.

Dim location As Long
Dim oneChar As Char
FileOpen(1, "C:\TESTFILE.TXT", OpenMode.Binary)
While location < LOF(1)
   Input(1, oneChar)
   location = Loc(1)
   WriteLine(1, location & ControlChars.CrLf)
End While
FileClose(1)

Anotações Developer Dispositivo Inteligente

Não há suporte para esta função.

Requisitos

Namespace: Microsoft.VisualBasic

**Módulo:**FileSystem

Assembly: Visual Basic Runtime Library (em Microsoft.VisualBasic.dll)

Consulte também

Referência

Função EOF

Função LOF

Função Buscar

IOException