老师,我的一个菜单控件按钮的意思如下:从“存货明细表”中加载“存货编码”到表“存货汇总表”,条件是先到“汇总表”查找编码,如果已经存在和“存货明细表”相同的编码,则不加载这个编码,如果没有,则加载不重复的编码。
我的代码如下:
Dim dr As DataRow
dr = DataTables("存货汇总表").Find("存货编码 = '" & e.NewValue & "'")
If dr IsNot Nothing Then
Return
End If
Else
Dim f As New Filler
f.SourceTable = DataTables("存货明细表") '指定数据来源
f.SourceCols = "存货编码" '指定数据来源列
f.DataTable = DataTables("存货汇总表") '指定数据接收表
f.DataCols = "存货编码" '指定数据接收列
f.Fill() '填充数据
但有问题,改成如下,还是有问题
Dim dr As DataRow
dr = DataTables("存货汇总表").Find("[存货编码] = '" & e.NewValue & "'")
If dr IsNot Nothing Then
Return
End If
Else
Dim f As New Filler
f.SourceTable = DataTables("存货明细表") '指定数据来源
f.SourceCols = "存货编码" '指定数据来源列
f.DataTable = DataTables("存货汇总表") '指定数据接收表
f.DataCols = "存货编码" '指定数据接收列
f.Fill() '填充数据
请老师提点,谢谢