主题：我想把查询出某个单位的数据全部删除掉，再导入这个单位的数据，怎么用代码

我查询出来一个单位的数据，我想把这个单位的数据全部删除掉，再导入这个单位的数据，怎么用代码
此主题相关图片如下：qq图片20130621130110.jpg

删除一条记录代码是

If MessageBox.show("是否删除本记录?","请确认", MessageBoxButtons.OKCancel) = DialogResult.OK Then

Tables("总人口").Current.Delete

End If

那么删除符合查询出来数据的代码是什么？

另外，清空全部数据的代码是什么？

清空所有数据，保留空行：

For Each r As Row In e.Table.Rows
    For Each c As Col In e.Table.Cols
        r(c.Name) = Nothing       
    Next
Next

删除符合条件的行：
e.Table.DataTable.DeleteFor("姓名 = 'dd'")

删除所有行：
e.Table.DataTable.DataRows.Clear()