Inhoudsopgave
Beschrijving lijningang
Leest een enkele regel uit een Open sequentieel bestand en wijst deze toe aan een string.
Lijninvoersyntaxis
| 1 | Lijningang #Bestandsnummer, VarNaam |
De regelinvoeropdracht bevat 2 argumenten:
Bestandsnummer: Elk geldig dossiernummer.
VarNaam: Geldige Variabele- of String-variabelenaam.
Voorbeelden van Excel VBA-regelinvoerverklaring
Om de regelinvoerverklaring te testen, maakt u een tekstbestand "test.txt" op de D-schijf. (D:\test.txt) Neem aan dat de inhoud van het bestand als volgt is.
| 123 | abc1 2 3xy z |
Voer de volgende code uit.
| 12345678910111213 | Sub LineInput_Example()Dim strLine As StringDim strContent As StringOpen "D:\test.txt" voor invoer als #1 ' Bestand openen.Do While Not EOF(1) ' Loop tot het einde van het bestand.Line Input #1, strLine ' Lees regel in variabele.strContent = strContent & strLineLusSluiten #1 ' Sluit bestand.MsgBox strContentEinde sub |
Het resultaat zal dan als volgt zijn.
