Piezīme.: Mēs vēlamies sniegt jums visjaunāko palīdzības saturu jūsu valodā, cik vien ātri to varam. Šī lapa ir tulkota automatizēti, un tajā var būt gramatiskas kļūdas un neprecizitātes. Mūsu nolūks ir šo saturu padarīt jums noderīgu. Vai lapas lejasdaļā varat mums pavēstīt, vai informācija jums noderēja? Ērtai atsaucei šeit ir šis raksts angļu valodā.
Piezīme.: Funkcija, metodi, objektu vai rekvizītu, kas aprakstīts šajā tēmā ir atspējots, ja Microsoft Jet Expression Service ir atvērta smilškastes režīmu, kas neļauj iespējami nedrošās izteiksmes novērtēšanas. Lai iegūtu papildinformāciju par smilškastes režīmu, meklējiet "smilškastes režīma" palīdzībā.
Tiek atgriezta virkne, kurā ir rakstzīmes no faila, kas atvērta datu ievadi vai binārā režīmā.
Sintakse
Ievades ( skaitlis, [ #] faila_numurs)
Ievades sintaksē ir šādi argumenti:
Arguments | Apraksts |
|---|---|
|
numurs |
Obligāts. Jebkuru derīgu skaitliska izteiksme norādot atgriežamo rakstzīmju skaits. |
|
faila_numurs |
Obligāts. Jebkuru derīgu faila numurs. |
Piezīmes
Fails ar Drukāšana # vai nodotparasti ir ierakstīti datu nolasīt, izmantojot funkciju Input . Izmantojiet šo funkciju, tikai ar failiem, kas atvērti ievades vai binārā režīmā.
Atšķirībā no priekšrakstu ievades #ievades funkcija atgriež visas rakstzīmes, kas rakstīts, tai skaitā komati, rakstatgriezes rakstzīmes, rindpadeves, pēdiņas un atstarpes.
Ar failiem, kas atvērti bināro piekļuves, mēģinot lasīt, izmantojot failu, izmantojot funkciju Input līdz EOF atgriež True , radīsies kļūda. Izmantojiet funkciju LOF un Loc nevis EOF lasot bināros failus ar ievadi, vai saņemt , izmantojot funkcija EOF .
Piezīme.: Izmantojiet funkciju InputB baitu datiem, kas atrodas teksta failiem. Ar InputB, skaitlis norāda atgriezties nevis atgriežamo rakstzīmju skaits baitu skaitu.
Piemērs.
Piezīme.: Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.
Šajā piemērā izmantota funkcija Input lasīt vienu rakstzīmi pa vienam no faila un izdrukāt logu tūlītējs . Šajā piemērā tiek pieņemts, ka TESTFILE ir teksta fails ar dažām datu paraugu rindiņām.
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.
