Input, funksjon

Viktig: Denne artikkelen er maskinoversatt, se ansvarsfraskrivelsen. Du finner den engelske versjonen av artikkelen her som referanse.

Merknad: Funksjonen, metoden, objektet eller egenskapen som beskrevet i dette emnet er deaktivert hvis Microsoft Jet Expression Service kjører i sandkassemodus som hindrer evaluering av potensielt usikre uttrykk. Hvis du vil ha mer informasjon om sandkassemodus, kan du søke etter "sandkassemodus" i Hjelp.

Returnerer en streng som inneholder tegn fra en fil som er åpnet i inndata - eller binær modus.

Syntaks

Inndata ( tall; [# ] filnummer)

Syntaksen for inndata -funksjonen har disse argumentene:

Argument

Beskrivelse

tall

Obligatorisk. En hvilken som helst gyldig numerisk uttrykk som angir hvor mange tegn som skal returneres.

filnummer

Obligatorisk. En hvilken som helst gyldig filnummer.


Kommentarer

Data som lest med funksjonen inndata skrives vanligvis til en fil med Print # eller plassere. Bruk denne funksjonen bare med filer som er åpnet i inndata - eller binær modus.

I motsetning til Input # -setningen returnerer funksjonen inndata alle tegnene den leser, inkludert komma, returtegn, linjeskift, anførselstegn og innledende mellomrom.

Med filer åpnet for binær tilgang, genererer et forsøk på å lese gjennom filen med Input -funksjonen til EOF returnerer Sann en feil. Bruk funksjonene LOF og Loc i stedet for EOF når du leser binære filer med inndata, eller Bruk når du bruker EOF -funksjonen.

Merknad: Bruk InputB -funksjonen for byte dataene i tekstfiler. Med InputBangir tall antall byte som skal returneres i stedet for antall tegn som skal returneres.

Eksempel

Merknad: I eksemplene nedenfor vises bruken av denne funksjonen i en VBA-modul (Visual Basic for Applications). Hvis du vil ha mer informasjon om hvordan du arbeider med VBA, velger du Utviklerreferanse fra rullegardinlisten ved siden av Søk og skriver inn ett eller flere søkeord i søkeboksen.

Dette eksemplet brukes Input -funksjonen til å lese ett tegn om gangen fra en fil og skrive den ut på øyeblikksvinduet . Dette eksemplet forutsetter at TESTFILE er en tekstfil med noen få linjer med eksempeldata.

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.

Merknad: Ansvarsfraskrivelse for maskinoversettelse: Denne artikkelen er oversatt av et datasystem i stedet for en oversetter. Microsoft tilbyr disse maskinoversettelsene slik at brukere som ikke snakker engelsk, får tilgang til innhold om Microsoft-produkter, -tjenester og –teknologier. Ettersom artikkelen er maskinoversatt, kan den inneholde feil i vokabular, syntaks eller grammatikk.

Utvid ferdighetene dine
Utforsk opplæring
Vær først ute med de nye funksjonene
Bli med i Office Insiders

Var denne informasjonen nyttig?

Takk for tilbakemeldingen!

Takk for tilbakemeldingen! Det høres ut som det kan være lurt å sette deg i kontakt med én av våre Office-kundestøtteagenter.

×