Dim nms As New List(Of String)
Dim drs As New List(of DataRow)
With DataTables("明细账")
    nms = .GetValues("科目编号|公司名称")
    For Each nm As String In nms \'找出每个产品的第一行数据, 添加到集合drs中
        drs.Add(.Find("科目编号 = \'" & nm(0) & "\'and 公司名称 = \'" & nm(1) & "\'", "[_SortKey]"))
    Next
    For Each dr As DataRow In drs
        .DataCols("借方金额").RaiseDataColChanged(dr)
    Next

End With

以上高效更新流水账的代码，提示如下错误，应该怎么修改？

无法将类型为“System.Collections.Generic.List`1[System.String[]]”的对象强制转换为类型“System.Collections.Generic.List`1[System.String]”。