Input-funksjonen [VBA]

Returnerer den opne straumen frå inndata eller ei binærfil (streng).

warning

Denne konstanten eller funksjonen eller dette objektet vert slått på med uttrykket Option VBASupport 1 sett framføre den køyrbare programkoden i ein modul.


Syntaks:


        Input( Number as Integer, [# ] FileNumber as Integer)
    

Returverdi:

String

Parametrar:

Tal: Nødvendig. Numerisk uttrykk som bestemmer kor mange teikn som skal returnerast.

#: Valfri.

FilNummer: Nødvendig. Eit gyldig filnummer.

Feilkodar

6 Overflyt

52 Ugyldig filnamn eller filnummer

62 Lesing etter filslutt (EOF)

Eksempel:


        REM ***** BASIC *****
        Option VBASupport 1
        Sub Example_Input
            Dim MyData
            Open "MyDataFile.txt" For Input As #1
            Do While Not EOF(1)
                MyData = Input(1, #1)
                Print MyData
            Loop
            Close #1
        End Sub
    

Støtt oss!