参考
DataTables("表A").deletefor("第一列 not in ('" & DataTables("表B").GetComboListString("第一列").replace("|", "','") & "')")