Napomena: Funkcija, metod, objekat ili vlasništvo opisane u ovoj temi je onemogućeno ako se pokreće Microsoft Jet Expression usluga u okviru "sandbox" režima, što sprečava procenu potencijalno nebezbednih izraza. Više informacija o "sandbox" režimu potražite u okviru pomoći "sandbox režim".

Vraća nisku koja sadrži znakove iz datoteke otvorene u ulaznim ili binarnom režimu.

Sintaksa

Unos ( broj, [# ] filenumber)

Sintaksa funkcije Input ima sledeće argumente:

Argument

Opis

broj

Obavezno. Bilo koje važeće brojni izraz navesti broj znakova za povraćaj.

filtriљi

Obavezno. Važeće broj datoteke.


Napomene

Podaci koji se čitaju pomoću funkcije Input obično se pišu u datoteku sa Štampaj # ili stavkom. Koristite ovu funkciju samo ako su datoteke otvorene u ulaznim ili binarnom režimu.

Za razliku od ulazne # izjave, funkcija Input vraća sve znakove koje čita, uključujući zareze, povraćaj, linearne, znake navoda i razmake na početku.

Kada se datoteke otvaraju za binarni pristup, pokušaj da se pročita datoteka pomoću funkcije Input dok se ne daje TRUE generiše grešku. Koristite funkcije LOF i loc umesto EOF kada čitate binarne datoteke sa unosomili koristite funkcijuafor .

Napomena:  Koristite funkciju InputB za podatke bajtova koji se nalaze unutar tekstualnih datoteka. Ako je InputB, broj precizira broj bajtova za povraćaj, a ne broj znakova za povraćaj.

Primer

Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.

U ovom primeru, funkcija Input se koristi za čitanje jednog znaka odjednom iz datoteke i štampanje u neposrednom prozoru. Ovaj primer pretpostavlja da je TESTFILE tekstualna datoteka sa nekoliko linija uzorka podataka.

Dim MyChar
Open "TESTFILE" For Input As #1 ' Open file.
Do While Not EOF(1) ' Loop until end of file.
MyChar = Input(1, #1) ' Get one character.
Debug.Print MyChar ' Print to the Immediate window.
Loop
Close #1 ' Close file.

Potrebna vam je dodatna pomoć?

Unapredite veštine
Istražite obuku

Da li su vam ove informacije koristile?

Koliko ste zadovoljni kvalitetom jezika?
Šta je uticalo na vaše iskustvo?

Hvala vam na povratnim informacijama!

×