级联组合框的设计教程

 

本教程最终实现的效果下图：

 

 

设计步骤如下：

1.新建表，输入相关字段，保存为“省市表”如下图所示

   

 

2.在“省市表”里输入一些数据，如下图

 

 

3.新建一个窗体，在上面添加一个组合框，弹出的“组合框向导”点“取消”。单击该组合框（combo0）的属性卡里的“行来源”的“...”，如下图

 

 

 

4.在sql语句中，作如下设置，如图，注意，要点出“总计：分组”，方法是在表格里单击右键出现“总计”一行即是，如图。（这样做是使组合框的数据能不重复，即显示“江苏、浙江”而非“江苏 江苏 江苏 浙江 浙江 浙江”）

 

        

 

5.在窗体中再添加一个组合框，在“行来源”中做如下设置，如下图：

取消“省份”显示的√，条件里输入语句“[forms]![窗体1]![combo0]”

 

 

6.下面添加一些代码，点击

  输入代码：

Private Sub combo0_AfterUpdate()

Me.Combo2 = ""

Me.Combo2.Requery

End Sub

 

最后运行即可。

 

 

 

扩展

联级组合框多用在添加资料时的简化操作，下面做一下介绍

1.       接上文，在程序里添加新表格“人员表”，做如下图设计：

 

 

2.       添加窗体2，数据来源选择“人员表”，将“姓名、省别、市别”添加到窗体2，如下图

 

3.  在“省别”上右键，“变更为”—“组合框”

 

4.      参照前文的步骤3、4，设置“省别”的行来源

 

5.      将“市别”变更为组合框，参照前文的步骤5进行设置，如下图

 

 

6.   输入代码如下：

  Private Sub 省别_AfterUpdate()

Me.市别 = ""

Me.市别.Requery

End Sub

运行窗体即可，以下是数据表视图的状态