Foxtable(狐表)用户栏目专家坐堂 → 为什么 我每次 输入10*10都会发生错误


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

主题:为什么 我每次 输入10*10都会发生错误

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


加好友 发短信
等级:婴狐 帖子:25 积分:320 威望:0 精华:0 注册:2012/10/30 22:13:00
为什么 我每次 输入10*10都会发生错误  发帖心情 Post By:2013/4/26 12:51:00 [只看该作者]

怎么回事儿啊

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:?? .zip


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


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

你在哪里输入10*10,是查询吗?
[此贴子已经被作者于2013-4-26 14:30:59编辑过]

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


加好友 发短信
等级:狐神 帖子:4752 积分:34568 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2013/4/26 14:53:00 [只看该作者]

顶一下


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


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

以下是引用y2287958在2013-4-26 14:53:00的发言:
顶一下

顶个一千遍也没用.问你在哪里输入出错.你又不说.

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


加好友 发短信
等级:狐神 帖子:4752 积分:34568 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2013/4/26 15:20:00 [只看该作者]

俺看出来的问题就在筛选条件的“*”上
试试这个:
If e.Col.Name = "货主" Then '如果编辑的是客户ID列
    If e.Col.DroppedDown Then '如果下拉窗口已经打开
        Dim tbl As Table = Tables("窗口1_Table1") 
        If e.Text = "" Then '如果内容为空
            tbl.Filter = "" '显示所有客户
        Else '否则根据输入内容进行模糊筛选
            Dim txt As String = "'%" & e.Text.Replace("*","[*]") & "%'"
            tbl.Filter = "货主 Like " & txt & " Or 包装店 Like " & txt 
        End If
    End If
End If

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


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

以下是引用y2287958在2013-4-26 15:20:00的发言:
俺看出来的问题就在筛选条件的“*”上
试试这个:
If e.Col.Name = "货主" Then '如果编辑的是客户ID列
    If e.Col.DroppedDown Then '如果下拉窗口已经打开
        Dim tbl As Table = Tables("窗口1_Table1") 
        If e.Text = "" Then '如果内容为空
            tbl.Filter = "" '显示所有客户
        Else '否则根据输入内容进行模糊筛选
            Dim txt As String = "'%" & e.Text.Replace("*","[*]") & "%'"
            tbl.Filter = "货主 Like " & txt & " Or 包装店 Like " & txt 
        End If
    End If
End If

我把你误以为是楼主了. 我点了几下.所有输入框都输入10*10也没见出错.

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


加好友 发短信
等级:婴狐 帖子:25 积分:320 威望:0 精华:0 注册:2012/10/30 22:13:00
  发帖心情 Post By:2013/4/26 17:31:00 [只看该作者]

谢谢各位的帮助 解决了


 回到顶部