主题：选择列，明细查询

老师这里选择列表单，，下面出库明细就把明细筛选出来

 

Dim t As Table = Tables("出库明细")
     With Tables("出库列表")
         If .Current Is Nothing Then
             t.Filter = "False"
          Else
             t.Filter = "出库单号= " & .Current("出库单号")
         End If
     End With

此主题相关图片如下：1669007304733.png


此主题相关图片如下：1669007142976.png

t.Filter = "出库单号= 'ckmx' + "##"+""" & .Current("出库单号") = "'ckmx' + "##"+""" & "'"

 

老师改不出来啊，，技术部够呀，怎么改都是错的，，麻烦你给写一下，学习一下呗谢谢了

t.Filter = "出库单号= 'ckmx'+ "" + ## + ""+""" & .Current("出库单号") = "'ckmx'+ "" + ## + "" + """ & "'"

 

改成这样，现在不报错了，但是不会执行

 

嗯就是2楼的复制上了，还是不会选呢，，郁闷，不知道错那里了

窗口副表事件里面也设置了，出库列表的事件选择里面也写上了，就是不会执行

老师不好意思打扰你了，，找到原因了，，副表用的表名我给设出库明细了，，应该是出库列表_table1

可以执行了