Access組合框多級聯動-行政區域選擇

2017-09-21 15:32:00
tmtony8
原創
6013

在Access中,有多個組合框,每個組合框的的值受限于上一層組合框的值

即組合框的聯動。如在組合框選擇了一個省份后,下一層組合框智能篩選這個省份的市


設置方法:

一、建立基礎表,這里我們建立3個表:省,市,縣(區)這3個表


二、窗體設置

1、省設置

① 窗體設計圖如下:創建3個組合框,分別命名為省,市,縣。窗體保存為命名為“窗體12


②  設置省的組合框的行來源:

SELECT 省.省編號, 省.省名 FROM 省;

同時設置組合框屬性,列數為2,列寬為0;2


③ 設置組合框屬性 更新后事件為:

Private Sub 省_AfterUpdate()
    Me.市.Requery
    Me.市 = Null
    Me.縣 = Null
End Sub

這里的代碼主要是當選擇省份后,自動刷新市,同時設置市和縣為空


2、設置市

如上面同理,設置市的行來源為

SELECT 市.市編號, 市.市名  FROM 市
WHERE (((市.省編號)=[forms]![窗體12]![省]));


這里同時要記得設置 列數和列寬。


市組合框的更新后事件為:

Private Sub 市_AfterUpdate()
    Me.縣.Requery
    Me.縣 = Null
End Sub



3、設置縣

設置縣的行來源為:

SELECT 縣名.縣名 FROM 縣名
WHERE (((縣名.上級市)=[forms]![窗體12]![市]));


最后效果圖:

    分享
    北京十一选五基本走势