dim cnt as integer = Datatables("xxx").Compute("Count(_identify)", "某列 <= 0")
if cnt > 0 then
messagebox.show("存在小于零 的")
end if