老师，下面代码是表示在pjtzhzb表的同一行查找“出piao人”列和“出piao银行”列是否有与本表相同的值，如果没有找到，则将此值复制到pjtzhzb中，否则不复制。下面代码无法执行。
If e.DataCol.Name = "出piao人" Then
If e.NewValue IsNot Nothing AndAlso e.DataRow("出piao银行") Is Nothing Then
Dim dr As DataRow
dr = DataTables("pjtzhzb").Find("出piao人 = '" & e.NewValue & "'AND 出piao银行 = '" & e.NewValue & "'")
If dr Is Nothing
dr = DataTables("pjtzhzb").addnew
dr("出piao人") = e.NewValue
dr("出piao银行") = e.NewValue
End If
End If
End If
加好友 
发短信
Post By：2021/11/14 10:14:00 [显示全部帖子]
