VB.NET aracılığıyla metin dosyası oluşturma/düzenleme

Question

Aşağıdaki algoritmayı VB.NET'te nasıl kodlarım?

Answer 1

Dim FILE_NAME As String = "C:\textfile.txt" 
Dim i As Integer 
Dim aryText(4) As String 

aryText(0) = "Mary WriteLine" 
aryText(1) = "Had" 
aryText(2) = "Another" 
aryText(3) = "Little" 
aryText(4) = "One" 

Dim objWriter As New System.IO.StreamWriter(FILE_NAME, True) 

For i = 0 To 4 
    objWriter.WriteLine(aryText(i)) 
Next 

objWriter.Close() 
MsgBox("Text Appended to the File") 

Eğer System.IO.StreamWriter 'ın yapıcı o zaten varsa bir dosyaya ek veya bunları yapmazsa bir yenisini yaratacak içinde True ikinci parametreyi

Procedure logfile() 
{ 
    if "C:\textfile.txt"=exist then 
     open the textfile; 
    else 
     create the textfile; 
    end if 
    go to the end of the textfile; 
    write new line in the textfile; 
    save; 
    close; 
} 

.

Answer 2

Bu tür bir kutudan çıkış yapan bir bileşen kullanmak en iyisidir. Örneğin, Enterprise Library'dan Logging Application Block. Bu şekilde, esneklik, ölçeklenebilirlik elde edersiniz ve günlük dosyanızla çekişme olmaz. ...

(üzgünüm, ben VB bilmiyorum ama çeviri yeterince basit olmalıdır) özel olarak soruya cevap vermek için

void Main() 
{ 
    using(var fs = File.Open(@"c:\textfile.txt", FileMode.Append)) 
    { 
     using(var sw = new StreamWriter(fs)) 
     { 
      sw.WriteLine("New Line"); 
      sw.Close(); 
     } 

     fs.Close(); 
    } 
} 

Answer 3

Bu da tek bir satır elde edilebilir:

System.IO.File.AppendAllText(filePath, "Hello World" & vbCrLf) 

Eğer eksikse dosyayı oluşturur, metni ekler ve tekrar kapatır.

Bkz. MSDN, File.AppendAllText Method.