主题：窗口禁止重复值录入

新增按钮代码：

Dim cpxh As String = e.Form.Controls("Dropbox1").Value
Dim dr As Row = Tables("新增产品明细_Table1").Find("产品型号 = '" & cpxh & "' And 订单号 = '" & Tables("新增产品明细_Table1").current("订单号")  & "'")
If dr IsNot Nothing Then
    MessageBox.Show("已经存在相同型号的行!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    e.Cancel = True
End If

在同一个订单中，订单明细表中的产品型号一列不能重复录入产品型号，在窗口中我使用的是副本表。

执行上段代码错误提示： 没有可访问的find接受此数目的参数，因此重载决策失败。

是不是因为find只在DataTable查找符合条件的行，副本表不可以所以出现上面的错误，应该怎么写代码？

Dim cpxh As String = e.Form.Controls("Dropbox1").Value
Dim fdr As DataRow = DataTables("销售明细表").Find("产品型号 = '" & cpxh & "' And 订单号 = '" & Tables("销售明细表").Current("订单号")  & "'")
If fdr IsNot Nothing Then
    MessageBox.Show("已经存在相同型号的行!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    e.Cancel = True

End if

改成上面后仍然提示错误：

.NET Framework 版本：4.0.30319.42000
Foxtable 版本：2019.12.17.18
错误所在事件：窗口,新增产品明细,Button1,Click
详细错误信息：
未将对象引用设置到对象的实例。

红色字体部分引起的问题，应该怎么改代码？