Popis EOF
Vrátí hodnotu označující, zda bylo dosaženo konce souboru (logická hodnota).
Syntaxe EOF
V editoru VBA můžete zadat „EOF (“ a zobrazit syntaxi funkce EOF:
Funkce EOF obsahuje argument:
Číslo souboru: Libovolné platné číslo souboru.
Příklady funkce Excel VBA EOF
Chcete -li otestovat funkci EOF, vytvořte na jednotce D textový soubor „test.txt“. (D: \ test.txt) Předpokládejme, že obsah souboru je následující.
123 | abc1 2 3xy z |
Spusťte prosím následující kód.
1234567891011 | Sub Input_Fx_Example ()Dim strContent As StringDim MyCharOtevřete soubor „D: \ test.txt“ pro vstup jako č. 1 „Otevřete soubor.Do Don't EOF (1) 'Loop až do konce souboru.MyChar = Input (1, #1) 'Získejte jeden znak.strContent = strContent & MyChar 'SmyčkaMsgBox strContentZavřít #1 'Zavřít soubor.End Sub |
Výsledek bude následující.
Zde pomocí funkce EOF určilo, že bylo dosaženo konce souboru.