Как взять значение нескольких текстовых полей и создать одно расширенное текстовое поле (для сохранения в формате.txt) VB.NET

Question

Я хочу знать, как взять несколько текстовых полей (со значением, вменяемым пользователем) и собрать их вместе, чтобы сделать один большой блок текста, чтобы превратить в.txt. Я специально пытаюсь сделать приложение для гитары.

Я уже создал базовый дизайн, но мне нужна помощь в его сохранении. Я поставил Menustrip, чтобы сохранить. Когда пользователь щелкает, он открывает форму с расширенным текстовым полем.

Моя проблема: я хочу, чтобы он взял текстовые поля, отформатировал их в определенном порядке и добавил их в расширенное текстовое поле, где они могли бы позже сохранить как.txt.

Не стесняйтесь задавать любые вопросы, чтобы прояснить мою ситуацию. Благодарю.

Answer 1

Ниже приведен код, который сохраняет все данные текстовых полей в строковую переменную, а затем содержимое этой переменной присваивается richtextbox. Есть две кнопки: одна для отправки данных текстовых полей в richtextbox, а другая для сохранения их в текстовом файле. Я надеюсь, что вы найдете это полезным.

Открытый класс Form1 Private Sub Form1_Load(отправитель как объект, e как EventArgs) Обрабатывает MyBase.Load

End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim tbox As String = ""
    tbox &= TextBox1.Text & Environment.NewLine &
        TextBox2.Text & Environment.NewLine &
        TextBox3.Text & Environment.NewLine &
        TextBox4.Text & Environment.NewLine &
        TextBox5.Text
    RichTextBox1.Text = tbox
End Sub

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    SaveMyFile()
End Sub

Public Sub SaveMyFile()
    ' Create a SaveFileDialog to request a path and file name to save to.
    Dim saveFile1 As New SaveFileDialog()

    ' Initialize the SaveFileDialog to specify the RTF extension for the file.
    saveFile1.DefaultExt = "*.txt"
    saveFile1.Filter = "TXT Files|*.txt"

    ' Determine if the user selected a file name from the saveFileDialog.
    If (saveFile1.ShowDialog() = System.Windows.Forms.DialogResult.OK) _
        And (saveFile1.FileName.Length) > 0 Then

        ' Save the contents of the RichTextBox into the file.
        RichTextBox1.SaveFile(saveFile1.FileName,
            RichTextBoxStreamType.PlainText)
    End If
End Sub

Конечный класс