VBA Izjava o ulazu

Opis ulaza

Vraća otvoreni tok ulazne ili binarne datoteke (niz).

Ulazna sintaksa

1 Unos (Broj, [#] Broj datoteke)

Naredba Input sadrži 2 argumenta:

Broj: Broj znakova za vraćanje.

Broj datoteke:Važeći broj datoteke.

Primjeri ulazne izjave programa Excel VBA

Za testiranje izraza Input, stvorite tekstualnu datoteku "test.txt" na pogonu D. (D: \ test.txt) Pretpostavimo da je sadržaj datoteke sljedeći.

123 abc1 2 3xy z

Pokrenite sljedeći kôd.

1234567891011 Sub Input_Fx_Example ()Dim strContent As StringDim MyCharOtvorite "D: \ test.txt" Za unos kao #1 'Otvorite datoteku.Učiniti Dok Nije EOF (1) 'Petlja do kraja datoteke.MyChar = Unos (1, #1) 'Dobijte jedan znak.strContent = strContent & MyChar 'PetljaMsgBox strContentZatvori #1 'Zatvori datoteku.Kraj podm

Tada će rezultat biti sljedeći.

wave wave wave wave wave