今天是七夕，七夕快樂，大家今天有沒有人約呢？

相信大部分的Access玩家都是玩Excel的高手，很多的功能在Excel中實現對大家來說都是小菜，比如今天要講的聯動。

那么，我們現在就來講一下在Access中怎么用一張表實現組合框的聯動。我們用最具有代表性的省市區縣來舉例。

1新建表

具體的表如下圖：

2建窗體

具體的窗體如下：

組合框省的屬性：

行來源：SELECT Province FROM tbl_Area GROUP BY Province

或者

行來源：SELECT Distinct Province FROM tbl_Area

限于列表：是

允許編輯值列表：否

另外兩個組合框的設置除了行來源外，其他屬性與省份的組合框一樣

3添加代碼 1Private?Sub?省_AfterUpdate()
2????'方法一
3????Me.市.RowSource?=?"SELECT?Distinct?City?FROM?tbl_Area?where?Province='"?&?Me.省?&?"'?"
4????'方法二
5????'????Me.市.RowSource?=?"SELECT?City?FROM?tbl_Area?where?Province='"?&?Me.省?&?"'?group?by?City"
6????Me.市.SetFocus?'獲得焦點
7????Me.市.Dropdown??'自動展開
8End?Sub
9
10Private?Sub?市_AfterUpdate()
11
12????Me.區縣.RowSource?=?"SELECT?County?FROM?tbl_Area?where?City='"?&?Me.市?&?"'"
13????Me.區縣.SetFocus
14????Me.區縣.Dropdown
15End?Sub

注意：大家應該能看到，為什么省與市的行來源需要Group By 或者Distinct。如果不加的話會出現下圖的情況：

沒錯，就是為了去重，因為我們這里只用一張實現，因省、市數據不是唯一的，所以要去掉重復的數據。

或者也可以這樣做：

另外還有一種方法，是將條件寫在行來源中，如下圖：

你以為這樣做了就不需要添加代碼了，錯了，我們還需要在組合框的更新后事件添加如下代碼：

1Private?Sub?省_AfterUpdate()
2????Me.市.SetFocus
3????Me.市.Dropdown
4????Me.市.Requery
5End?Sub

上面兩種方法，我更喜歡第一種，因為便于調試，你們覺得呢。

好了！講到這里，用一張表實現三級聯動的示例就講完了，大家針對上面所講的，結合實際是否可以做一個四級聯動，五級聯動？大家快去試一下吧！

連組合框都在聯動了，你怎么還沒有人和你聯動？

我就知道你“在看”

總結

以上是生活随笔為你收集整理的dropdownlist三级联动怎么实现_一张表实现三级联动的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。