[RESOLVED] Parsing String to data row

[.paul.]

the easiest way is to split it as you load the dt:

Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim fileText As String = IO.File.ReadAllText("C:\Users\Paul\Desktop\string.txt")
        fileText = fileText.Substring(fileText.IndexOf("<STX>")).Replace(" ", "")
        Dim items() As String = fileText.Split(New String() {"<RS>", "<US>", "<STX>", "<EOT>"}, StringSplitOptions.RemoveEmptyEntries)
 
        Dim dt As New DataTable
        dt.Columns.Add("Test")
        dt.Columns.Add("Person ID")
        dt.Columns.Add("Date")
        dt.Columns.Add("Time")
        dt.Columns.Add("Technician ID")
        dt.Columns.Add("Hearing Results")
        dt.Columns.Add("Impedance")
 
        For x As Integer = 0 To items.GetUpperBound(0) Step 6
            Dim d As DateTime = Date.ParseExact(items(x + 2), "yyyyMMddHHmm", Nothing)
            dt.Rows.Add(New Object() {items(x), items(x + 1), d.ToString("MM/dd/yyyy"), d.ToString("HH:mm"), items(x + 3), items(x + 4), items(x + 5)})
        Next
 
        DataGridView1.DataSource = dt
    End Sub
 
End Class