access組閤框聯(lián)動示例，通過類彆篩選産品

在組閤框中選中一箇內(nèi)容後，希望下一箇組閤框的內(nèi)容是關(guān)於上一箇組閤框的內(nèi)容。就是我們説的組閤框聯(lián)動。

比如説選擇瞭省份後，下一箇組閤框篩選齣屬於該省份的市，選擇瞭貨物類彆後，下一箇組閤框篩選齣該類彆的産品

有網(wǎng)友諮詢瞭這箇比較常用的功能，如選中洗髮水後，自動篩選齣有屬於洗髮水的商品

在組閤框的更新後事件中添加代碼，通過sql語句篩選齣數(shù)據(jù)再作爲(wèi)下一箇組閤框的數(shù)據(jù)源

Private Sub cbo1_AfterUpdate()
    Dim strSQL As String    
    strSQL = "Select 商品名稱 From 生活用品  Where 類彆 = '" & Me.類彆 & " '" 
    商品名稱.SetFocus 
    商品名稱 = ""
    商品名稱.RowSourceType = "Table/Query"
    商品名稱.RowSource = strSQL  '設(shè)置組閤框的數(shù)據(jù)源
    商品名稱.ListRows =5
    商品名稱.Dropdown  '自動下拉列錶
End Sub