Cuprins
Descriere intrare linie
Citește o singură linie dintr-un fișier secvențial Deschis și o atribuie unui șir.
Sintaxă de intrare linie
| 1 | Intrare linie #FileNumber, VarName |
Instrucțiunea de intrare pe linie conține 2 argumente:
Numărul fișierului: Orice număr de fișier valid.
VarName: Nume variabil valid sau String.
Exemple de declarație de intrare linie Excel VBA
Pentru a testa declarația de intrare linie, creați un fișier text „test.txt” pe unitatea D. (D: \ test.txt) Să presupunem că conținutul fișierului este după cum urmează.
| 123 | abc1 2 3xy z |
Vă rugăm să rulați următorul cod.
| 12345678910111213 | Sub LineInput_Example ()Dim strLine As StringDim strContent As StringDeschideți „D: \ test.txt” pentru intrare ca numărul 1 'Deschideți fișierul.Faceți în timp ce nu EOF (1) 'Buclați până la sfârșitul fișierului.Line Input # 1, strLine 'Read line into variable.strContent = strContent & strLineBuclăÎnchideți numărul 1 'Închideți fișierul.MsgBox strContentSfârșitul Sub |
Apoi, rezultatul va fi după cum urmează.
