if DataTables("表A"").DataCols.contains("AA") = false then 如果没有AA列DataTables("表A"").DataCols.Add("AA", GetType(String)) 就添加
end if
if DataTables("表A"").DataCols.contains("BB") = false then 如果没有BB列DataTables("表A"").DataCols.Add("BB", GetType(String)) 就添加
……
Dim r As Row = Tables("表A").Current
If r.IsNull("AA") OrElse r.IsNull("BB") OrElse r.IsNull("CC") OrElse r.IsNull("DD") Then
Dim ssr() As String = r("多列").split("\")
r("AA") = ssr(0)
……
加好友 
发短信
Post By：2023/4/11 9:44:00 [显示全部帖子]
