Share via


FileSystem.LineInput(Int32) Método

Definição

Lê uma única linha de um arquivo sequencial aberto e a atribui a uma variável String.

public:
 static System::String ^ LineInput(int FileNumber);
public static string LineInput (int FileNumber);
static member LineInput : int -> string
Public Function LineInput (FileNumber As Integer) As String

Parâmetros

FileNumber
Int32

Obrigatórios. Qualquer número de arquivo válido.

Retornos

Lê uma única linha de um arquivo sequencial aberto e a atribui a uma variável String.

Exceções

Fim do arquivo atingido.

FileNumber não existe.

Exemplos

Este exemplo usa a LineInput função para ler uma linha de um arquivo sequencial e atribuí-la a uma variável. Este exemplo pressupõe que TestFile é um arquivo de texto que tem várias linhas de dados de exemplo.

Dim TextLine As String
' Open file.
FileOpen(1, "TESTFILE", OpenMode.Input)
' Loop until end of file.
While Not EOF(1)
    ' Read line into variable.
    TextLine = LineInput(1)
    ' Print to the console.
    Console.WriteLine("1", TextLine)
End While
FileClose(1)

Comentários

A LineInput função é fornecida para compatibilidade com versões anteriores e pode afetar o desempenho. Para aplicativos não herdados, o My.Computer.FileSystem objeto fornece melhor desempenho. Para saber mais informações, confira Acesso a Arquivos com o Visual Basic.

Dados lidos com LineInput costumam ser gravados em um arquivo usando-se Print.

Importante

Ao ler de arquivos, não tome decisões sobre o conteúdo de um arquivo com base na extensão de nome de arquivo. Por exemplo, um arquivo chamado Form1.vb pode não ser um arquivo de origem do Visual Basic.

A LineInput função lê de um arquivo um caractere de cada vez até encontrar uma sequência de retorno de carro (Chr(13)) ou retorno de carro/alimentação de linha (Chr(13) + Chr(10)). As sequências de retorno de carro/alimentação de linha são ignoradas em vez de acrescentadas à cadeia de caracteres.

Importante

A leitura de um arquivo usando a LineInput função requer Read acesso da FileIOPermissionAccess enumeração .

Aplica-se a

Confira também