条件限制筛选Like [Forms]![IQCBad]![SubIQCBad]![Vender] & "*"不

zyz218

请版主看看IQCBad窗体中部品料号来源中对Vender供应商的限制条件 Like [Forms]![IQCBad]![SubIQCBad]![Vender] & "*"  不知为什么不起作用？？

wdh008

全是英文的。郁闷。

zyz218

为了在日文与中文操作系统中都可以运行，所以不得不这样！！！

skylark

To zyz218:

Private Sub Vender_BeforeUpdate(Cancel As Integer)
Dim stNam As String
stNam = Me.Vender
Me.CodeNo.RowSource = "SELECT MaterialVender.CodeNo, MaterialVender.MaterialName, MaterialVender.ProductionName, MaterialVender.Vender " _
& "FROM MaterialVender WHERE MaterialVender.Vender Like '" & stNam & "*" & "' ORDER BY MaterialVender.MaterialName,MaterialVender.ProductionName"

End Sub

zyz218

Thank skylark

zyz218

4楼兄弟提供的方法不失为一种好方法，但在下所设想的应该也可以实现，只是好像在窗体与子窗体关系上面有点问题，如果直接就是一个窗体之内，是没有问题的，现在是子窗体内筛选就不行了，不知错在那里？数据指向应该没有错误！！！！

skylark

To zyz218:

其实不一定,在控件中引用会这样: =Forms("主窗体").("子窗体").Form .("控件名")

我试了不知在查询里的 .Form 放的格式.

zyz218

指向好像没问题，不知为什么不起作用？？？不知谁知道！！

zyz218

顶一下，等了一天了！！！！！

zyz218

[em06][em06][em06][em06]