office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

access组合框联动示例,通过类别筛选产品

2020-12-30 08:00:00
tmtony8
原创
19058

在组合框中选中一个内容后,希望下一个组合框的内容是关于上一个组合框的内容。就是我们说的组合框联动。

比如说选择了省份后,下一个组合框筛选出属于该省份的市,选择了货物类别后,下一个组合框筛选出该类别的产品

有网友咨询了这个比较常用的功能,如选中洗发水后,自动筛选出有属于洗发水的商品



在组合框的更新后事件中添加代码,通过sql语句筛选出数据再作为下一个组合框的数据源

Private Sub cbo1_AfterUpdate()
    Dim strSQL As String    
    strSQL = "Select 商品名称 From 生活用品  Where 类别 = '" & Me.类别 & " '" 
    商品名称.SetFocus 
    商品名称 = ""
    商品名称.RowSourceType = "Table/Query"
    商品名称.RowSource = strSQL  '设置组合框的数据源
    商品名称.ListRows =5
    商品名称.Dropdown  '自动下拉列表
End Sub


    分享