主题：[求助] _Identidy 代码里没法引用 如何解决这一问题？

 想在另一列引用 _Identidy 里的编码

或者在代码里进行引用？

帮助里好像没相关的介绍 ，代码如下（错误的，但是我想实现的目的）

Beforecloseproject  销售意向客户进度管制表 里的编号列是表达式_Identidy

Dim r As Row = Tables("销售意向客户进度管制").Current
Dim dr As DataRow = DataTables("意向客户历史回访情况").Find("编号 = '" & r("编号1") & "' And 最后一次回访情况 = " & r("最后一次回访情况") & " And 最后联系日期 = #" & r("最后联系日期") & "#  And 备注 = " & r("备注") & "")
If dr IsNot Nothing Then
    messagebox.show("与历史记录重复","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Return
Else
    dr = DataTables("意向客户历史回访情况").AddNew()
    dr("编号") = r("编号1")
    dr("最后一次回访情况") = r("最后一次回访情况")
    dr("最后联系日期") = r("最后联系日期")
    dr("备注") = r("备注")
    dr.Save()
End If

 错误如下