FileSystem.FreeFile Yöntem
Tanım
Önemli
Bazı bilgiler ürünün ön sürümüyle ilgilidir ve sürüm öncesinde önemli değişiklikler yapılmış olabilir. Burada verilen bilgilerle ilgili olarak Microsoft açık veya zımni hiçbir garanti vermez.
İşlev tarafından FileOpen
kullanılabilecek bir sonraki dosya numarasını temsil eden bir Integer
değer döndürür.
public:
static int FreeFile();
public static int FreeFile ();
static member FreeFile : unit -> int
Public Function FreeFile () As Integer
Döndürülenler
İşlev tarafından FileOpen
kullanılabilecek bir sonraki dosya numarasını temsil eden bir tamsayı değeri.
Özel durumlar
255'ten fazla dosya kullanılıyor.
Örnekler
Bu örnekte, bir sonraki kullanılabilir dosya numarasını döndürmek için işlevi kullanılır FreeFile
. Döngü içinde çıkış için beş dosya açılır ve her birine bazı örnek veriler yazılır.
Dim count As Integer
Dim fileNumber As Integer
For count = 1 To 5
fileNumber = FreeFile()
FileOpen(fileNumber, "TEST" & count & ".TXT", OpenMode.Output)
PrintLine(fileNumber, "This is a sample.")
FileClose(fileNumber)
Next
Açıklamalar
Henüz kullanılmayan bir dosya numarası sağlamak için kullanın FreeFile
.