Foxtable(狐表)用户栏目专家坐堂 → 生日查询


  共有9007人关注过本帖树形打印复制链接

主题:生日查询

帅哥哟,离线,有人找我吗?
初级狐鸟
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:355 积分:2415 威望:0 精华:0 注册:2012/7/9 11:55:00
生日查询  发帖心情 Post By:2012/8/30 10:51:00 [显示全部帖子]

出生年月,用日期格式显示如图
图片点击可在新窗口打开查看此主题相关图片如下:koq~6wos`mnhfie8)55v)l.jpg
图片点击可在新窗口打开查看

想弄一个查询只查找月份和日期就行了。

 

怎么弄啊!    只会弄所有年月日的查找。。。。。。。。


 回到顶部
帅哥哟,离线,有人找我吗?
初级狐鸟
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:355 积分:2415 威望:0 精华:0 注册:2012/7/9 11:55:00
  发帖心情 Post By:2012/8/30 14:05:00 [显示全部帖子]

("出生年月",6,5) ,后面那个6,5就是只有月份那些了?

 回到顶部
帅哥哟,离线,有人找我吗?
初级狐鸟
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:355 积分:2415 威望:0 精华:0 注册:2012/7/9 11:55:00
  发帖心情 Post By:2012/8/30 14:23:00 [显示全部帖子]

比如这种时间查询Dim Filter As String
With e.Form.Controls("TimeCheck")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "入职时间 >= #" & .Value & "#"
    End If
End With
With e.Form.Controls("TimeCheck1")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "入职时间 <= #" & .Value & "#"
    End If
End With
If Filter > "" Then
    Tables("员工档案之公司项目").Filter = Filter
End If

怎么改成查询时只有月和日呢?


 回到顶部
帅哥哟,离线,有人找我吗?
初级狐鸟
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:355 积分:2415 威望:0 精华:0 注册:2012/7/9 11:55:00
  发帖心情 Post By:2012/8/30 15:02:00 [显示全部帖子]

哦~~~知道了,谢谢了哈!

 回到顶部