Как читать и хранить данные из текстового файла - PullRequest
0 голосов
/ 20 апреля 2020

Я упросту свой вопрос, насколько это возможно.

Теперь у меня есть программа с двумя кнопками и одним текстовым полем

Кнопка 1 = диалог открытия файла

Кнопка 2 = Сделать некоторый код с загруженным файлом, затем экспортируйте его в текстовое поле

'Button 1'
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button2.Click

    OpenFileDialog1.ShowDialog()

End Sub

Как я могу заставить кнопку 2 считывать данные, как это было текстовое поле, и делать с ним некоторый код, а затем экспортировать в textbox1

1 Ответ

1 голос
/ 20 апреля 2020

это то, что вы ищете?

Public Class Form1

    Dim textpath As New TextBox

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        OpenFileDialog1.Filter = "TXT|*.txt"
        If OpenFileDialog1.ShowDialog = DialogResult.OK Then
            textpath.Text = My.Computer.FileSystem.ReadAllText(OpenFileDialog1.FileName)
        End If
    End Sub

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

        If textpath.Text = Nothing Then
        Else
            TextBox1.Text = textpath.Text ' all text in .txt
            TextBox1.Text = textpath.Lines(0) ' text from lines 0=first line, 1= second line 2.3.4.......
        End If

    End Sub

End Class
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...