Ficheiro Texto - NewLine

[jviana]

Porque é que apaga tudo, e só adiciona uma nova linha?

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim nome As String
        Dim tonalidade As String
        nome = TextBox1.Text
        tonalidade = ComboBox1.Text
        Using writer As New IO.StreamWriter(Form1.insPath)
            writer.WriteLine(tonalidade & " - " & nome)
        End Using
        Me.Close()
    End Sub

Como é que eu faço para nao ter este problema?

Cumps. J.Viana

[Andrepereira9]

Boas

Isso acontece, porque estás a utilizar um StreamWriter. O StreamWriter cria sempre um ficheiro novo (mesmo que exista ou não).

Utiliza 1º um StreamReader para leres o ficheiro o ficheiro para uma variável, e depois voltas a guardar tudo