Applies ToAccess for Microsoft 365 Access 2021 Access 2019 Access 2016

Huomautus: Tässä ohjeaiheessa kuvattu funktio, menetelmä, objekti tai ominaisuus ei ole käytössä, jos Microsoft Jet Expression Service toimii eristetyssä tilassa, mikä estää mahdollisesti vahingollisten lausekkeiden arvioimisen. Katso lisätietoja eristetystä tilasta ohjeen ”Eristetty tila” -kohdasta.

Palauttaa kokonaisluvun, joka vastaa seuraavaa tiedoston numero, jonka voi avata Open-lauseella.

Syntaksi

FreeFile[(alueennumero)]

Valinnainen alueennumero-argumentti on muuttuja, joka määrittää alueen, josta seuraava vapaa tiedostonumero palautetaan. Määritä luku 0 (oletus), niin tiedostonumero palautetaan alueelta 1–255. Määritä luku 1, niin tiedostonumero palautetaan alueelta 256–511.

Huomautuksia

FreeFile-funktiota käyttämällä saat tiedostonumeron, joka ei ole vielä käytössä.

Esimerkki

Huomautus: Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa. Jos haluat lisätietoja VBA:n käytöstä, valitse Sovelluskehittäjän opasHaku-kentän viereisestä luettelosta ja anna yksi tai useampi hakuehto hakukenttään.

Tässä esimerkissä FreeFile-funktiolla palautetaan seuraava käytettävissä oleva tiedostonumero. Viisi tiedostoa avataan silmukan sisällä, ja kuhunkin kirjoitetaan mallitietoja.

Dim MyIndex, FileNumberFor 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 #FileNumberNext MyIndex

Tarvitsetko lisäohjeita?

Haluatko lisää vaihtoehtoja?

Tutustu tilausetuihin, selaa harjoituskursseja, opi suojaamaan laitteesi ja paljon muuta.

Osallistumalla yhteisöihin voit kysyä kysymyksiä ja vastata niihin, antaa palautetta sekä kuulla lisää asiantuntijoilta, joilla on runsaasti tietoa.