如何在vb6.0数据库中按照年龄查找?

Question

year(date)-年龄。还要将出生日期转换为具有的月，好象就有点麻烦，因为您输入年龄时不可能输入 23.553 岁吧。cdate(year(date)-年龄 & "/" &month(date) & "/" day(date) ) 即可

Answer 1

1.cdate(year(date)即可
2.用SQL语言：
  dim rct as recoudset
  dim sqlstr as string
  sqlstr="  select * from fieldname where ......"  '有些记不得了，呵呵
  rct= data1.database.openrecoudset（sqlstr)
  set data1.recoudset=rct  '将查询记录重新制表，前提是有DBGRID控件
这些够了吧，呵呵，解决了一定不要忘记兄弟哟！

Answer 2

Select * From TableName Where BirthDay Between #" & cstr(DateFrom) & "# And #" & cstr(DateTo) & "#"

Answer 3

年龄大于@Age的
select * from table where dateadd(year,birthday,@Age)<=GetDate()
其他自己解决吧