Funkcija Input

Važno :  Ovaj je članak strojno preveden. Pogledajteizjavu o odricanju od odgovornosti. Verziju ovog članka na engleskom potražite ovdje.

Napomena : Funkcija, način, objekt ili svojstvo koje su opisane u ovoj temi onemogućeno je ako Microsoft Jet Expression Service izvodi u načinu rada s memorijom za testiranje, što sprječava potencijalno nesigurnih izraza. Dodatne informacije o načinu rada s memorijom za testiranje ključnoj riječi "način rada s memorijom za testiranje" u sustavu pomoći.

Vraća niz koji sadrži znakove iz datoteke otvorene u načinu rada za unos ili Binarni .

Sintaksa

Unos ( broj, [ #] filenumber)

Sintaksa funkcije unos sadrži sljedeće argumente:

Argument

Opis

broj

Obavezan. Bilo koji valjani numerički izraz koji određuje broj znakova koji se vraćaju.

filenumber

Obavezan. Bilo koji valjani broj datoteke.


Napomene

Podataka koji se čitaju pomoću funkcije Input obično zapisati datoteku s Print # ili Postavljanje. Ovu funkciju koristite samo za datoteke otvoren u načinu rada za unos ili Binarni .

Za razliku od izjava Input #unos , funkcija vraća sve znakove koji se čita, uključujući zareze, prelasci, početke, navodnike i početne razmake.

S datotekama otvorenima za Binarni pristup, pokušaj čitanja datoteke korištenjem funkcije Input dok EOF vraća vrijednost True generira pogrešku. Koristite funkcije LOF i Loc umjesto EOF prilikom čitanja binarne datoteke s unosili se kada se koristi funkcija EOF .

Napomena : Koristite funkciju InputB bajt podataka unutar tekstnih datoteka. S InputBbroj određuje broja bajtova da biste se vratili umjesto broj znakova koji se vraćaju.

Primjer

Napomena : Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

U ovom se primjeru koristi funkciju unos čitanje jednog znaka odjednom iz datoteke, a zatim ga ispisati izvršnom prozor. U ovom se primjeru pretpostavlja da TESTFILE je tekstna datoteka s nekoliko redaka ogledne podatke.

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.

Napomena : Izjava o odricanju od odgovornosti za strojni prijevod: ovaj je članak preveo računalni sustav bez ljudske intervencije. Microsoft nudi strojne prijevode da bi korisnicima koji ne razumiju engleski omogućio čitanje sadržaja o Microsoftovim proizvodima, uslugama i tehnologijama. Budući da je preveden strojno, članak možda sadrži pogreške u vokabularu, sintaksi ili gramatici.

Proširite svoje vještine
Istražite osposobljavanje

Jesu li vam ove informacije bile korisne?

Hvala vam na povratnim informacijama!

Hvala vam na povratnim informacijama! Čini se da bi vam pomoglo kad bismo vas povezali s nekim od naših agenata podrške za Office.

×