2009-08-26 33 views
7

Làm cách nào để mã hóa thuật toán bên dưới trong VB.NET?Tạo/chỉnh sửa tệp văn bản qua VB.NET

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; 
} 

Trả lời

12
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") 

Nếu bạn đặt tham số thứ hai để True trong constructor 's System.IO.StreamWriter nó sẽ nối vào một tập tin nếu nó đã tồn tại, hoặc tạo một hình mới nếu nó không.

2

Tốt nhất nên sử dụng thành phần thực hiện loại đăng xuất này khỏi hộp. Ví dụ: Logging Application Block từ Enterprise Library. Bằng cách đó, bạn sẽ có được tính linh hoạt, khả năng mở rộng và không có tranh chấp với tệp nhật ký của bạn.

Để trả lời câu hỏi của bạn đặc biệt (xin lỗi, tôi không biết VB, nhưng bản dịch nên đủ đơn giản) ...

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(); 
    } 
} 
8

này có thể đạt được trong một dòng đơn quá:

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

Nó sẽ tạo tệp nếu thiếu, thêm văn bản và đóng lại.

Xem MSDN, File.AppendAllText Method.

+0

rất đơn giản và sạch sẽ –

Các vấn đề liên quan