جدا کردن دو کلمه از فایل txt

[336699]

سلام

از این کد استفاده کن

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim bekhoon As New System.IO.StreamReader(Application.StartupPath & "\file.txt", True)

        While bekhoon.Peek > -1

            Dim khoondam() As String = bekhoon.ReadLine.Split("/")

            TextBox1.Text = khoondam(0)

            TextBox2.Text = khoondam(1)

        End While

        bekhoon.Close()

    End Sub