Modul
Indhald
Innhaldsliste 🔎︎

# Line Input # uttrykket

Les strenger frå ei sekvensiell fil til ein variabel.

## Syntaks:

    Line Input #FilNummer As Integer, Var As String

## Parametrar:

FileNumber: Nummeret på den fila som inneheld dataa som skal lesast. Fila må vera opna med uttrykket Open ved å bruka nøkkelordet INPUT.

var: Namnet på variabelen som resultatet er lagra i.

Ved hjelp av uttrykket Line Input# kan du lesa strengar frå ei open fil inn i ein variabel. Strengvariablane vert lesne linje for linje fram til det første retur (Asc=13) eller linjeskiftet (Asc=10). Merke for linjeslutt vert ikkje tatt med i resultatstrengen.

## Eksempel:

    Sub ExampleWorkWithAFile

    Dim iNumber As Integer

    Dim sLine As String

    Dim aFile As String

    Dim sMsg As String

        aFile = "c:\data.txt"

        iNumber = Freefile

        Open aFile For Output As #iNumber

        Print #iNumber, "Dette er ei tekstlinje"

        Print #iNumber, "Dette er ei tekstlinje til"

        Close #iNumber

        iNumber = Freefile

        Open aFile For Input As iNumber

        While Not EOF(iNumber)

            Line Input #iNumber, sLine

            If sLine <>"" Then

                sMsg = sMsg & sLine & chr(13)

            End If

        Wend

        Close #iNumber

        MsgBox sMsg

    End Sub