Per aprire e salvare un testo basta mettere una text box con il multiline 2 button con “Salva” e “Apri” poi mettere il OpenFile Dialog e il SaveFile Dialog e inserire in “Apri” questo code:

If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim R As New IO.StreamReader(OpenFileDialog1.FileName)
TextBox1.Text = R.ReadToEnd
R.Close()
End If

Per salvare:

If SaveFileDialog.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim W As New IO.StreamWriter(SaveFileDialog.FileName)
W.Write(TextBox.Text)
W.Close()
End If

Tutorial By ::PoDo::
Per scaricare il sources:QUI