Microsoft hesabıyla oturum açın
Oturum açın veya hesap oluşturun.
Merhaba,
Farklı bir hesap seçin.
Birden çok hesabınız var
Oturum açmak istediğiniz hesabı seçin.

Not: Microsoft Jet İfade Hizmeti 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 olabilecek ifadelerin değerlendirilmesini engeller. Korumalı alan modu hakkında daha fazla bilgi için Yardım'da "korumalı alan modu" araması yapın.

Giriş veya İkili modunda açılan bir dosyadaki karakterleri içeren Dize döndürür.

Söz dizimi

Input( number, [# ] filenumber)

Input işlevinin söz diziminde şu bağımsız değişkenler bulunur:

Bağımsız değişken

Açıklama

sayı

Gerekli. Döndürülecek karakter sayısını belirten geçerli sayısal ifade.

dosyasayısı

Gerekli. Geçerli herhangi bir dosya numarası.


Notlar

Input işleviyle okunan veriler genellikle Yazdır # veya Koy ile bir dosyaya yazılır. Bu işlevi yalnızca Giriş veya İkili modunda açılmış dosyalarla kullanın.

Input # deyiminden farklı olarak, Input işlevi virgüller, satır başı, satır beslemeleri, tırnak işaretleri ve baştaki boşluklar da dahil olmak üzere okuduğu tüm karakterleri döndürür.

dosyalar İkili erişim için açıldığında, EOFTrue döndürene kadar Input işlevini kullanarak dosyayı okuma girişimi bir hata oluşturur. Giriş ile ikili dosyaları okurken EOF yerine LOF ve Loc işlevlerini kullanın veya EOF işlevini kullanırken Get kullanın.

Not:  Metin dosyalarının içinde yer alan bayt verileri için InputB işlevini kullanın. InputB ile sayı, döndürülecek karakter sayısı yerine döndürülecek bayt sayısını belirtir.

Ö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 , bir dosyadan bir kerede bir karakter okumak ve Bunu Anında penceresine yazdırmak için Input işlevi kullanılır. Bu örnekte, TESTFILE birkaç satır örnek veri içeren bir metin dosyası olduğu varsayılır.

Dim MyChar
Open "TESTFILE" For Input As #1 ' Open file.
Do While Not EOF(1) ' Loop until end of file.
MyChar = Input(1, #1) ' Get one character.
Debug.Print MyChar ' Print to the Immediate window.
Loop
Close #1 ' Close file.

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

Daha fazla seçenek mi istiyorsunuz?

Abonelik avantajlarını keşfedin, eğitim kurslarına göz atın, cihazınızın güvenliğini nasıl sağlayacağınızı öğrenin ve daha fazlasını yapın.

Topluluklar, soru sormanıza ve soruları yanıtlamanıza, geri bildirimde bulunmanıza ve zengin bilgiye sahip uzmanlardan bilgi almanıza yardımcı olur.

Bu bilgi yararlı oldu mu?

Dil kalitesinden ne kadar memnunsunuz?
Deneyiminizi ne etkiledi?
Gönder’e bastığınızda, geri bildiriminiz Microsoft ürün ve hizmetlerini geliştirmek için kullanılır. BT yöneticiniz bu verileri toplayabilecek. Gizlilik Bildirimi.

Geri bildiriminiz için teşekkürler!

×