Foxtable(狐表)用户栏目专家坐堂 → [求助]模糊查询


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

主题:[求助]模糊查询

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/28 14:44:00 [显示全部帖子]

试试

 

Dim txt As String = e.Form.Controls("DateTimePicker3").Text
Dim tbl As Table = Tables("回款录入窗_Table1")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt.Replace("-0", "/").replace("-", "/") & "%'"
    tbl.Filter = "Convert(安装日期, 'System.String') Like " & txt
End If

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/28 14:46:00 [显示全部帖子]

以下是引用zchlln在2016/1/28 13:50:00的发言:
双击窗口中的表中的单元格 在同窗口中的文本框里直接显示该车牌号 要怎么写呢

 

doubleClick事件

 

Forms("回款录入窗").Controls("TextBox1").Text = e.Row(e.col.Name)


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/2 9:41:00 [显示全部帖子]

 做个例子上来测试一下。

 

 你在代码那里弹出一下 msgbox(date.Now) 看看日期有什么不同。


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/2 9:41:00 [显示全部帖子]

或者你把日期同一设置成一样的格式。

 

http://jingyan.baidu.com/article/647f0115925aee7f2148a8b5.html

 


 回到顶部