Aracılığıyla paylaş


FileSystem.Write(Int32, Object[]) Yöntem

Tanım

Verileri sıralı bir dosyaya yazar. ile Write yazılan veriler genellikle kullanılarak Inputbir dosyadan okunur.

public:
 static void Write(int FileNumber, ... cli::array <System::Object ^> ^ Output);
public static void Write (int FileNumber, params object[] Output);
static member Write : int * obj[] -> unit
Public Sub Write (FileNumber As Integer, ParamArray Output As Object())

Parametreler

FileNumber
Int32

Gereklidir. Integer Geçerli bir dosya numarası içeren ifade.

Output
Object[]

İsteğe bağlı. Dosyaya yazacak bir veya daha fazla virgülle ayrılmış ifade.

Özel durumlar

Dosya modu geçersiz.

Örnekler

Bu örnek, sıralı bir dosyaya ham veri yazmak için işlevini kullanır Write .

' Open file for output.
FileOpen(1, "TestFile.txt", OpenMode.Output)
' Print text to the file. The quotation marks will be in the display.
Write(1, "This is a test.")
' Go to the next line.
WriteLine(1)
' Skip a line.
WriteLine(1)
' Print in two print zones. You will see commas and quotation marks
' in the output file.
WriteLine(1, "Zone 1", SPC(10), "Zone 2")
' Build a longer string before calling WriteLine.
WriteLine(1, "Hello" & "  " & "World")
' Include five leading spaces.
WriteLine(1, SPC(5), "Leading spaces")
' Print a word starting at column 10.
WriteLine(1, TAB(10), "Hello")

' Assign Boolean and Date values.
Dim aBool As Boolean
Dim aDate As DateTime
aBool = False
aDate = DateTime.Parse("February 12, 1969")

' Dates and Booleans are translated using locale settings of 
' your system.
WriteLine(1, aBool & " is a Boolean value.")
WriteLine(1, aDate & " is a date.")
' Close the file.
FileClose(1)

' Contents of TestFile.txt
'"This is a test.",
'
'"Zone 1",          "Zone 2"
'"Hello  World"
'     "Leading spaces"
'         ,"Hello"
'"False is a Boolean value."
'"2/12/1969 is a date."

Açıklamalar

Write ve WriteLine işlevleri geriye dönük uyumluluk için sağlanır ve performansı etkileyebilir. Eski olmayan uygulamalar My.Computer.FileSystem için nesnesi daha iyi performans sağlar. Daha fazla bilgi için bkz. Visual Basic ile Dosya Erişimi.

atlarsanız Output, dosyaya boş bir satır yazdırılır. Birden çok ifade virgülle ayrılabilir.

işlevinden Print farklı olarak işlev, Write öğeler arasına virgüller ve dosyaya yazıldıkları için dizelerin etrafına tırnak işaretleri ekler. Listeye açık sınırlayıcılar koymanız gerekmez. Write Bir dosyaya veri yazmak için kullanıldığında yalnızca sayısal, Boolean, tarih, null ve Error veri biçimleri desteklenir. Yerel ayardan bağımsız olarak verilerin kullanılarak Inputher zaman okunabilmesi ve doğru yorumlanması için aşağıdaki evrensel varsayımlar izlenir:

  • Sayısal veriler her zaman ondalık ayırıcı olarak nokta kullanılarak yazılır.

  • Veriler #TRUE# için Boolean veya #FALSE# yazdırılır. True ve False anahtar sözcükleri, yerel ayardan bağımsız olarak çevrilmiyor.

  • Tarih verileri evrensel tarih biçimi kullanılarak dosyaya yazılır. Bir tarih veya saat bileşeni eksik veya sıfır olduğu zaman, yalnızca sağlanan bölüm dosyaya yazılır.

  • Veriler boşsa Output dosyaya hiçbir şey yazılır. Ancak null veriler #NULL# için yazılır.

  • Veriler için Error çıkış olarak #ERROR errorcode#görünür. Anahtar Error sözcük, yerel ayardan bağımsız olarak çevrilmemiştir.

WriteLinedosyaya son karakteri Output yazdıktan sonra yeni satır karakteri (satır başı/satır beslemesi veya Chr(13) + Chr(10)) ekler.

Çift tırnak işareti veya "" kullanarak dizeye tırnak işaretleri ekleyebilirsiniz. Örneğin,

Dim x As String = "Double quotation marks aren't ""difficult"" to handle."

değeriyle Double quotation marks aren't "difficult" to handlebir dize döndürür.

veya işlevlerini kullanarak Write bir dosyaya yazmak için sabit listesinden FileIOPermissionAccess erişim gerekirAppend.WriteLine Daha fazla bilgi için bkz FileIOPermissionAccess . .

Şunlara uygulanır

Ayrıca bkz.