<form id="hbx9t"></form>

<noframes id="hbx9t">

    <em id="hbx9t"><span id="hbx9t"></span></em>

        <noframes id="hbx9t"><address id="hbx9t"><th id="hbx9t"><progress id="hbx9t"></progress></th></address>
        office交流網--QQ交流群號

        Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

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

        access組合框聯動示例,通過類別篩選產品

        2020-12-30 08:00:00
        tmtony8
        原創
        16775

        在組合框中選中一個內容后,希望下一個組合框的內容是關于上一個組合框的內容。就是我們說的組合框聯動。

        比如說選擇了省份后,下一個組合框篩選出屬于該省份的市,選擇了貨物類別后,下一個組合框篩選出該類別的產品

        有網友咨詢了這個比較常用的功能,如選中洗發水后,自動篩選出有屬于洗發水的商品



        在組合框的更新后事件中添加代碼,通過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


          分享