Megjegyzés
A témakörben ismertetett függvény, metódus, objektum vagy tulajdonság le van tiltva, ha a Microsoft Jet Expression Service védőfalas üzemmódban fut, mivel ez megakadályozza az esetleg nem biztonságos kifejezések kiszűrését. A védőfalas üzemmódról a súgóban a „védőfalas üzemmód” kifejezésre keresve talál további információt.
Egy egész számot ad eredményül, amely az Open utasítás által használható következő fájlszámot tartalmazza.
Szintaxis
FreeFile[(tartományszám)]
A választható tartományszám argumentum egy Variant, amely megadja azt a tartományt, amelyből a következő szabad fájlszámot vissza szeretné adni. A 0 (alapértelmezett) érték megadásával az 1–255 közötti fájlszámokat is visszaadhatja. Az 1 érték megadásával a 256 – 511 közötti fájlszámot adhatja vissza.
Megjegyzések
A FreeFile segítségével adjon meg egy olyan fájlszámot, amely még nincs használatban.
Példa
Megjegyzés
A következő példák egy Visual Basic for Applications (VBA) modulban mutatják be a függvény használatát. A VBA használatáról a Keresés elem mellett található legördülő listából a fejlesztői forrásokat választva, majd egy vagy több keresőszót megadva kaphat további tájékoztatást.
Ez a példa FreeFile függvényt használva adja vissza a következő elérhető fájlszámot. Öt fájl van megnyitva kimenetként a hurokban, és mindegyikbe mintaadat lesz írva.
Dim MyIndex, FileNumber
For MyIndex = 1 To 5 ' Loop 5 times.
' Get unused file number.
FileNumber = FreeFile
' Create file name.
Open "TEST" & MyIndex For Output As #FileNumber
' Output text.
Write #FileNumber, "This is a sample."
' Close file.
Close #FileNumber
Next MyIndex