做网站放广告,哪个网站买域名便宜,如何在百度上添加店铺的位置,龙门城乡规划建设局网站今天是七夕#xff0c;七夕快乐#xff0c;大家今天有没有人约呢#xff1f;相信大部分的Access玩家都是玩Excel的高手#xff0c;很多的功能在Excel中实现对大家来说都是小菜#xff0c;比如今天要讲的联动。那么#xff0c;我们现在就来讲一下在Access中怎么用一张表实… 今天是七夕七夕快乐大家今天有没有人约呢相信大部分的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 910Private Sub 市_AfterUpdate()1112 Me.区县.RowSource SELECT County FROM tbl_Area where City Me.市 13 Me.区县.SetFocus14 Me.区县.Dropdown15End Sub注意大家应该能看到为什么省与市的行来源需要Group By 或者Distinct。如果不加的话会出现下图的情况没错就是为了去重因为我们这里只用一张实现因省、市数据不是唯一的所以要去掉重复的数据。或者也可以这样做另外还有一种方法是将条件写在行来源中如下图你以为这样做了就不需要添加代码了错了我们还需要在组合框的更新后事件添加如下代码1Private Sub 省_AfterUpdate()2 Me.市.SetFocus3 Me.市.Dropdown4 Me.市.Requery5End Sub上面两种方法我更喜欢第一种因为便于调试你们觉得呢。好了讲到这里用一张表实现三级联动的示例就讲完了大家针对上面所讲的结合实际是否可以做一个四级联动五级联动大家快去试一下吧连组合框都在联动了你怎么还没有人和你联动我就知道你“在看”
