2013-07-14 2 views
2

привет, я использую этот код для сохранения содержимого listbox1 в .txt документе, который он работает. но как только я снова открываю программу и сохраняю новый текст, он переписывает оригинальный текст, как я могу добавить его в качестве дополнительного текста, а не для перезаписи. спасибо так много каждый 1.listbox to text document no overwording

Dim W As IO.StreamWriter 
Dim i As Integer 
W = New IO.StreamWriter("C:\test\test.txt") 

For i = 0 To ListBox2.Items.Count - 1 
    W.WriteLine(ListBox2.Items.Item(i)) 
Next 
W.close() 

ответ

3

Попробуйте

W = New IO.StreamWriter("C:\test\test.txt", True) 

Истинное утверждение означает, что вы хотите добавить текст в существующий файл.

+0

+1 для добавления разъяснений к коду. – Tim

+0

Огромное вам спасибо, что он лучше всего работает perefeklty, я оставил u 1 положительный ответ назад приветствия – user2581791

-1

Это замечательно!

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click 

Dim count As Integer = System.IO.File.ReadAllLines("location").Length 
    If count <= 9 Then 
     MsgBox("less then 10") 
    Else 
     MsgBox("more then 10") 
    End If 
End Sub