对“订单明细表”的“型号规格”列进行查询,而这个列是从产品信息表中通过关联表达式求得的,
我这边测试不能查询,请问是代码错了,还是没办法?
命令窗口中,简单的这样一句也通不过:
Tables("订单明细表").Filter = "型号规格 Like '*220*'"
在“查询窗体”中,“未交明细查询”的查询按钮代码如下:
Dim xhgg As WinForm.TextBox = e.Form.Controls("型号规格")
Dim cj As WinForm.ComboBox = e.Form.Controls("未交明细厂家筛选")
If cj.Value = "所有客户" Or cj.Value = "客户筛选" Then
MessageBox.Show(cj.value)
Tables(e.Form.Name & "_未交明细表").Filter = "未交数量>0 And 是否核销 = False And 型号规格 Like '*" & xhgg.Value & "*'"
'Tables(e.Form.Name & "_未交明细表").Filter = "型号规格 Like '*" & ggxh.Value & "*'"
MessageBox.Show("型号规格 Like '*" & xhgg.Value & "*'")
Else
Tables(e.Form.Name & "_未交明细表").Filter = "订单客户 = '" & cj.value &"' And 未交数量>0 And 是否核销 = False And 型号规格 Like '*" & xhgg.Value & "*'"
End If
项目文件:
[此贴子已经被作者于2014-8-17 9:22:34编辑过]