Foxtable(狐表)用户栏目专家坐堂 → [求助]帮忙看一下这个怎么弄


  共有21727人关注过本帖平板打印复制链接

主题:[求助]帮忙看一下这个怎么弄

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2008/10/8 10:27:00 [只看该作者]

代码非常简单:

 

For Each dr1 As DataRow In DataTables("B").DataRows

    If dr1.IsNull("第一列") = False Then

        For Each dr2 As Datarow In DataTables("A").Select("[第一列] = '" & dr1("第一列") & "'")

            dr2.Delete()

        Next

    End if

Next


[本帖被加为精华]
 回到顶部