VBA eilutės įvesties ataskaita

Linijos įvesties aprašymas

Skaito vieną eilutę iš „Open“ nuoseklaus failo ir priskiria ją eilutei.

Linijos įvesties sintaksė

1 Linijos įvestis #FileNumber, VarName

Eilutės įvesties teiginyje yra 2 argumentai:

Failo numeris: Bet koks galiojantis failo numeris.

VarName: Tinkamas kintamojo arba eilutės kintamojo pavadinimas.

„Excel VBA Line Input Statement“ pavyzdžiai

Norėdami patikrinti eilutės įvesties teiginį, sukurkite tekstinį failą „test.txt“ D diske. (D: \ test.txt) Tarkime, kad failo turinys yra toks.

123 abc1 2 3xy z

Prašome paleisti šį kodą.

12345678910111213 Sub LineInput_Example ()„Dim strLine“ kaip eilutėPritemdyti strContent kaip eilutęAtidarykite „D: \ test.txt“, kad įvestumėte kaip #1 „Atidaryti failą“.„Do while Not EOF“ (1) „ciklas iki failo pabaigos.1 eilutės įvestis, strLine 'Skaitykite eilutę į kintamąjį.strContent = strContent & strLineKilpaUždaryti #1 'Uždaryti failą.„MsgBox strContent“Pabaiga Sub

Tada rezultatas bus toks.

wave wave wave wave wave