VBA įvesties pareiškimas

Įvesties aprašymas

Grąžina atvirą įvesties arba dvejetainio failo srautą (eilutę).

Įvesties sintaksė

1 Įvestis (skaičius, [#] failo numeris)

Įvesties teiginyje yra 2 argumentai:

Skaičius: Grąžinamų simbolių skaičius.

Failo numeris:Tinkamas failo numeris.

„Excel VBA“ įvesties ataskaitos pavyzdžiai

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

123 abc1 2 3xy z

Prašome paleisti šį kodą.

1234567891011 Antrasis įvestis_Fx_pavyzdys ()Pritemdyti strContent kaip eilutę„Dim MyChar“Atidarykite „D: \ test.txt“, kad įvestumėte kaip #1 „Atidaryti failą“.„Do while Not EOF“ (1) „ciklas iki failo pabaigos.MyChar = Įvestis (1, #1) 'Gaukite vieną simbolį.strContent = strContent & MyChar 'Kilpa„MsgBox strContent“Uždaryti #1 'Uždaryti failą.Pabaiga Sub

Tada rezultatas bus toks.

wave wave wave wave wave