查找本月有哪些人生日Data1.RecordSource = "select * from 生日记录 where " & Format(Data1.Recordset("出生日期"), "m") & "=" & Month(Now)高手哈哈
参考资料:www.vb.com