Sign in with Microsoft
New to Microsoft? Create an account.

Not: Microsoft Jet Expression Service korumalı alan modunda çalışıyorsa, bu konuda açıklanan işlev, yöntem, nesne veya özellik devre dışı bırakılır ve bu da güvenli olmayabilecek ifadelerin değerlendirilmesini önler. Korumalı alan modu hakkında daha fazla bilgi için Yardım'da "korumalı alan modu" araması.

Rastgele veya sıralı Booleiçin açılan dosyanın sonuna ulaşıldıysa, Doğru değerini içerenbir Tamsayı döndürür.

Söz dizimi

EOF( dosyasayı )

Gerekli dosya sayısıbağımsız değişken,geçerli herhangi bir sayı içeren bir Tamsayı dosya numarası.

Açıklamalar

Dosyanın sonundan giriş almaya çalışarak oluşturulan hatayı önlemek için EOF kullanın.

Dosyanın sonuna ulaşıncaya kadar EOF işlevi False döndürür. Dosyalar Rastgele veya İkili erişimiçin açıldığında, son yürütülen Get deyimi kaydın tamamını okuyana kadar EOFFalse döndürür.

İkili erişim için açılan dosyalar sayesinde, EOFTrue döndürene kadar Giriş işlevini kullanarak dosyayı okumayı denemesi hata verir. İkili dosyaları Inputile okurken EOF yerine LOF ve Loc işlevlerini kullanın veya EOF işlevini kullanırken Al işlevini kullanın. Çıktı için dosyalar açıldığında,EOF her zaman Doğru döndürür.

Örnek

Not: Aşağıdaki örneklerde, bu işlevin Visual Basic for Applications (VBA) modülünde kullanımı gösterilir. VBA ile çalışma hakkında daha fazla bilgi için, rama'nın yanındaki açılan listede Geliştirici Başvurusu'nu seçin ve arama kutusuna bir veya birden çok terim yazın.

Bu örnekte, dosyanın sonunu algılamak için EOF işlevi ır. Bu örnekte, MYFILE satırı birkaç metin olan bir metin dosyası olduğu varsaydır.

Dim InputData
' Open file for input.
Open "MYFILE" For Input As #1
' Check for end of file.
Do While Not EOF(1)
' Read line of data.
Line Input #1, InputData
' Print to the Immediate window.
Debug.Print InputData
Loop
' Close file.
Close #1

Daha fazla yardıma mı ihtiyacınız var?

Yeteneklerinizi geliştirin
Eğitimleri keşfedin
Yeni özellikleri ilk olarak siz edinin
Insider'Microsoft Office katılın

Bu bilgi yararlı oldu mu?

Dil kalitesinden ne kadar memnunsunuz?
Deneyiminizi ne etkiledi?

Geri bildiriminiz için teşekkürler!

×