IBM Lotus Symphony


Line Input # -lause [käytönaikainen]

Lukee merkkijonoja peräkkäistiedostosta muuttujaan.

Syntaksi:

Line Input #FileNumber As Integer, Var As String

Parametrit:

FileNumber: Luettavat tiedot sisältävän tiedoston numero. Tiedosto on ensin avattava käyttämällä Open-lausetta ja avainsanaa INPUT.

var: Sen muuttujan nimi, johon järjestelmä tallentaa tuloksen.

Line Input# -lauseen avulla voit lukea merkkijonoja avatusta tiedostosta muuttujaan. Järjestelmä lukee merkkijonomuuttujan tiedot rivi kerrallaan ensimmäiseen rivinvaihtoon (Asc=13) tai rivinsiirtoon (Asc=10) asti. Rivin lopetusmerkit eivät sisälly tuloksena olevaan merkkijonoon.

Esimerkki:

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, "This is a line of text"

Print #iNumber, "This is another line of text"

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


Palautetta tuotteesta | Lisäohjeet | Tavaramerkit