Declarație de intrare VBA

Descrierea intrării

Returnează fluxul deschis al unui fișier de intrare sau binar (șir).

Sintaxa de intrare

1 Intrare (Număr, [#] Număr fișier)

Instrucțiunea de intrare conține 2 argumente:

Număr: Numărul de caractere de returnat.

Numărul fișierului:Număr de fișier valid.

Exemple de declarație de intrare Excel VBA

Pentru a testa declarația de intrare, 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.

1234567891011 Sub Input_Fx_Example ()Dim strContent As StringDim MyCharDeschideț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.MyChar = Intrare (1, # 1) „Obțineți un caracter.strContent = strContent & MyChar 'BuclăMsgBox strContentÎnchideți numărul 1 'Închideți fișierul.Sfârșitul Sub

Apoi, rezultatul va fi după cum urmează.

wave wave wave wave wave