Foxtable(狐表)用户栏目专家坐堂 → [求助]一个关于日期筛选的问题哦


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

主题:[求助]一个关于日期筛选的问题哦

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


加好友 发短信
等级:童狐 帖子:266 积分:1700 威望:0 精华:0 注册:2013/5/5 17:46:00
[求助]一个关于日期筛选的问题哦  发帖心情 Post By:2013/5/14 8:59:00 [只看该作者]

之前有听人说过日期格式的要用=号和#号来写,不知道如何下手

Dim txt As String = e.Form.Controls("型号").Text
Dim tbl As Table = Tables("辉宏_Table1")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'*" & txt & "*'"
    tbl.Filter = "品名 Like " & txt & " Or 日期 = " & txt & " "
End If

能帮我改一下这段代码吗


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


加好友 发短信
等级:六尾狐 帖子:1418 积分:7167 威望:0 精华:0 注册:2013/3/18 8:37:00
  发帖心情 Post By:2013/5/14 9:03:00 [只看该作者]

tbl.Filter = "品名 Like " & txt & " Or 日期 = #" & txt & " #"

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/14 9:04:00 [只看该作者]

tbl.Filter = "品名 Like " & txt & " Or 日期 = #" & txt & "#"

日期用#号包起来即可.

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


加好友 发短信
等级:童狐 帖子:266 积分:1700 威望:0 精华:0 注册:2013/5/5 17:46:00
  发帖心情 Post By:2013/5/14 11:05:00 [只看该作者]

图片点击可在新窗口打开查看

 回到顶部