Applies ToAccess za Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Opomba: V tej temi opisana funkcija, metoda, predmet ali lastnost, je onemogočena, če se izvaja storitev Microsoft Jet Expression Service v načinu peskovnika, ki preprečuje vrednotenje morebitno nevarnih izrazov. Za več informacij o načinu peskovnika poiščite »način peskovnika« v pomoči.

Vrne niz z znaki iz datoteke, ki je odprta v načinu za vnos ali dvojiškem načinu.

Sintaksa

Input( število, [# ] št. datoteke)

Sintaksa funkcije Input ima te argumente:

Argument

Opis

število

Obvezno. Poljuben, veljaven številski izraz, ki določa število vrnjenih znakov.

št. datoteke

Obvezno. Poljubna veljavna številka datoteke.

Opombe

Podatki, prebrani s funkcijo Input, se običajno zapišejo v datoteko z izjavo Print # ali Put. To funkcijo uporabite samo za datoteke, ki so odprte v načinu za vnos ali v dvojiškem načinu.

Za razliko od izjave Input #, funkcija Input vrne vse znake, ki jih prebere, vključno z vejicami, znaki za prelom vrstic, znaki za pomik v novo vrstico, narekovaji in začetnimi presledki.

V datotekah, odprtih za dvojiški dostop, poskus branja datoteke z uporabo funkcije Input, dokler funkcija EOF ne vrne vrednosti True, ustvari napako. Pri branju dvojiških datotek s funkcijo Input, namesto funkcije EOF, uporabite funkciji LOF in Loc, ali pa pri uporabi funkcije EOF uporabite izjavo Get.

Opomba:  Uporabite funkcijo InputB za bajtne podatke, ki jih vsebujejo besedilne datoteke. V funkciji InputB, argument število določa število bajtov, ki bodo vrnjeni, in ne števila znakov.

Primer

Opomba: V spodnjih primerih je prikazana uporaba te funkcije v modulu Visual Basic for Applications (VBA). Če želite več informacij o delu z modulom VBA, izberite Vsebina za razvijalce na spustnem seznamu ob možnosti Iskanje in v iskalno polje vnesite enega ali več izrazov.

V tem primeru se funkcija Input uporablja za branje enega znaka iz datoteke in njegov izpis v neposrednem oknu. V tem primeru se predvideva, da je TESTFILE besedilna datoteka z nekaj vrsticami vzorčnih podatkov.

Dim MyCharOpen "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.LoopClose #1    ' Close file.

Ali potrebujete dodatno pomoč?

Ali želite več možnosti?

Raziščite ugodnosti naročnine, prebrskajte izobraževalne tečaje, preberite, kako zaščitite svojo napravo in še več.

Skupnosti vam pomagajo postaviti vprašanja in odgovoriti nanje, posredovati povratne informacije in prisluhniti strokovnjakom z bogatim znanjem.