主题：绑定数列后 ，值的重复判断出现死循环

Dim dr As DataRow = DataTables("库存表").Find("内部产品 ='" & e.Sender.Value & "'")

If dr IsNot Nothing Then '如果找到的话

MessageBox.show("此产品已经存在,请重新输入!")    

e.Cancel = True

End If