Innehållsförteckning
Linjeingång Beskrivning
Läser en enda rad från en öppen sekventiell fil och tilldelar den till en sträng.
Line Input Syntax
| 1 | Linjeingång #FileNumber, VarName |
Line Input -satsen innehåller två argument:
Filnummer: Alla giltiga filnummer.
VarName: Giltigt variabelnamn för variabel eller sträng.
Exempel på Excel VBA Line Input Statement
För att testa linjeinmatningsuttalandet, skapa en textfil “test.txt” på D -enheten. (D: \ test.txt) Antag att innehållet i filen är enligt följande.
| 123 | abc1 2 3xy z |
Kör följande kod.
| 12345678910111213 | Sub LineInput_Example ()Dim strLine som strängDim strContent As StringÖppna "D: \ test.txt" för inmatning som #1 'Öppna fil.Do While Not EOF (1) 'Loop till slutet av filen.Line Input #1, strLine 'Läs rad i variabel.strContent = strContent & strLineSlingaStäng #1 'Stäng fil.MsgBox strContentAvsluta Sub |
Resultatet blir då följande.
