主题：请教

Dim ta_cs As String = "第一列|第二列|第三列"

Dim nds(ta_cs.Length-1) As String

For Each arys As String() In ta.GetValues(ta_cs, "", ta_cs.Replace("|", ","))
    Dim flag As Boolean = False
    For i As Integer = 0 To arys.Length - 1
        If nds(i) <> arys(i) OrElse flag Then
            flag = True
            Dim ndr As DataRow = tb.AddNew
            ndr("第一列") = "".PadLeft(i * 5) & arys(i)
            nds(i) = arys(i)
        End If
    Next
Next