[已解决]如何做这两步筛选

goto2008

请看图片。。。。。

[ 本帖最后由 cuxun 于 2007-12-25 23:07 编辑 ]

andymark

要学会举一反三
Private Sub 货号列表框_Click()
Me.订单号列表框.RowSource = "SELECT DISTINCT 帮面指令表.订单号, 帮面指令表.货号, 帮面指令表.帮面ID, 组别 FROM 帮面指令表 where 货号='" & Me.货号列表框 & "'"
End Sub

goto2008

谢谢cuxun。。。就是这个效果

copyzzy

这个厉害。学学看！

goto2008

大哥，请看图片。。。。。。。。

想实现的是：不要老去人为自动更新。。。
如果“左边列表框”里筛出“中间列表框”时。，，
当“中间列表框”只有一行记录时。就让“右边的子窗体”马上自动跟着更新成符合“中间列表框”的记录出

省得再人为傻瓜式的去点击“中间列表框”

[ 本帖最后由 goto2008 于 2007-12-27 10:57 编辑 ]

goto2008

呵呵，不知道我罗里巴索，大家有没有看明白。

goto2008

咦，我再补一句：
其实我想实现的是，当左边列表框一被点击，中间列表框马上定位到第一条记录，而且子窗体马上跟着更新为符合第一条记录的所有记录

[ 本帖最后由 goto2008 于 2007-12-27 10:07 编辑 ]

hi-wzj

筛选后用代码自动赋值第一条记录应该就可以了，没试过。