你建立查询，在字段里写条件： =Forms![窗体名称]![下拉列表控件名称]
建立你刚才那个名称的窗体，在里面拉一个子窗体，数据源设置为刚才的查询表，连接字段属性删除连接字段。在窗体上面再拖一个Combo(下拉列表控件名)，在属性里面先源后面那个按钮，设置一个查询，只让他查表里面一个字段（这次是表），，让他排序，右健选择SQL，在Select后面加个Distinct表示下拉值来自数据表的一个字段，并且不重复。关闭查询设计器，就给他数据源等于保存了。
最后再在Combo后面拖一个按钮，右键选择属性，属性里找到事件，时间里找到单击，选择事件过程，他就会自动弹出VBA窗口，光标到按钮单击事件中间，在中间写代码:Me.Refresh
这样就可以直接通过点窗体上的按钮和下拉列表去查询数据表。
温馨提示：答案为网友推荐，仅供参考