Gente estou fazendo um editor de texto bbcode, e empaquei no botão abrir um arquivo que se localiza no MenuStrip1. E quero salvar o texto que for escrito no RichTextBox1 no computador.
Bom achei um cod na net:
|
Private Sub Abrir_Arquivos()
If Me.FileDialogNet.ShowDialog() = DialogResult.OK Then
Dim fs As New FileStream(FileDialogNet.FileName,
FileMode.Open, FileAccess.Read)
Dim m_streamReader As New StreamReader(fs)
' Lê o arquivo usando a classe StreamReader
m_streamReader.BaseStream.Seek(0, SeekOrigin.Begin)
' Lê cada linha do stream até a última
Me.RichTextBox1.Text = ""
Dim strLine As String =
m_streamReader.ReadLine()
While Not (strLine Is Nothing)
Me.RichTextBox1.Text
+= strLine + ControlChars.Lf
strLine = m_streamReader.ReadLine()
End While
' Fecha o stream
m_streamReader.Close()
End If
End Sub
|
Mais aparece alguns erros e se poderem ajudar, agradeço desde já.
