none
Gente me ajudam quero criar um botão abrir um arquivo no vb RRS feed

  • Pergunta

  • 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á.

    quarta-feira, 30 de janeiro de 2013 12:58

Respostas

Todas as Respostas