Dim fdr As DataRow = e.DataTable.Find("_Identify < " & e.datarow("_Identify"), "_Identify desc")
If fdr IsNot Nothing Then
msgbox("找到" & fdr("某列"))
End If