要达到你的要求，你的窗体上起码要有一个用於输入的文本框，以及用於显示结果的子窗体，接著：
1.子窗体的记录源设为：SELECT * FROM 表名 WHERE month(出生日期)=[forms]![主窗体名称]![组合框名称];
2.在文本框的更新后时间中写刷新代码：
Private Sub 组合框名称_AfterUpdate()
Me.子窗体名称.Requery
End Sub
注意：复制时请将代码中的中文名称修改为你自己的名称
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024