多值拆解的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

请教老师，以下代码拆解多值字段时，只拆解了第一个名字，而且是重复的，第二、第三...个名字没有拆解，要实现的是多值里面的姓名每人一行

请老师帮忙看看

For i As Integer = 0 To DataTables("合同表").DataRows.Count-1

Dim dt As DataTable

Dim lst As New Dictionary(of String ,DataRow)

For Each dr As DataRow In DataTables("合同表").DataRows

If dr.IsNull("审核人员") = False Then

Dim nms() As String = dr("审核人员").Split(",")

For Each nm As String In nms

Dim r As Row = Tables("合同表.合同审核").AddNew

r("审核人员") = nms(i)

End If

主题：多值拆解的问题