Foxtable(狐表)用户栏目专家坐堂 → 写了一段查找的代码,但是提示不对


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

主题:写了一段查找的代码,但是提示不对

美女呀,离线,留言给我吧!
Phoebe菲比
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:159 积分:1009 威望:0 精华:0 注册:2021/8/17 15:39:00
写了一段查找的代码,但是提示不对  发帖心情 Post By:2022/3/29 0:15:00 [显示全部帖子]

以下是我写的代码:
Dim filter As String
Dim sts() As String = {"客户","订单编号"}
For Each st As String In sts
    Dim var As String = e.Form.Controls(st).value
    If var IsNot Nothing Then
        var = var.replace("*","[*]")
        If filter Is Nothing Then
            filter = st & " like '*" & var & "*'"
        Else
            filter = filter & " and " & st & " like '*" & var & "*'"
        End If
    End If
Next

和之前一个模块写的代码一模一样,但是没办法正确出结果,请指教。


 回到顶部
美女呀,离线,留言给我吧!
Phoebe菲比
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:159 积分:1009 威望:0 精华:0 注册:2021/8/17 15:39:00
  发帖心情 Post By:2022/3/29 0:16:00 [显示全部帖子]

这是截图
图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20220329001431.png
图片点击可在新窗口打开查看

 回到顶部
美女呀,离线,留言给我吧!
Phoebe菲比
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:159 积分:1009 威望:0 精华:0 注册:2021/8/17 15:39:00
  发帖心情 Post By:2022/3/29 9:31:00 [显示全部帖子]

今天试了下把 * 改成 % ,会正确显示结果了,昨晚是不能。
但是用msgbox测试还是会显示这种结果。

 回到顶部
美女呀,离线,留言给我吧!
Phoebe菲比
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:159 积分:1009 威望:0 精华:0 注册:2021/8/17 15:39:00
  发帖心情 Post By:2022/3/29 9:31:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20220329092928.png
图片点击可在新窗口打开查看

 回到顶部
美女呀,离线,留言给我吧!
Phoebe菲比
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:159 积分:1009 威望:0 精华:0 注册:2021/8/17 15:39:00
  发帖心情 Post By:2022/3/29 19:07:00 [显示全部帖子]

麻烦蓝版帮我看看,谢谢。

 回到顶部
美女呀,离线,留言给我吧!
Phoebe菲比
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:159 积分:1009 威望:0 精华:0 注册:2021/8/17 15:39:00
  发帖心情 Post By:2022/3/29 19:08:00 [显示全部帖子]

附件

 回到顶部
美女呀,离线,留言给我吧!
Phoebe菲比
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:159 积分:1009 威望:0 精华:0 注册:2021/8/17 15:39:00
  发帖心情 Post By:2022/3/29 19:08:00 [显示全部帖子]

今天无法上传,出问题了。


 回到顶部
美女呀,离线,留言给我吧!
Phoebe菲比
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:159 积分:1009 威望:0 精华:0 注册:2021/8/17 15:39:00
  发帖心情 Post By:2022/3/30 10:49:00 [显示全部帖子]

麻烦蓝版指导一下。

 回到顶部
美女呀,离线,留言给我吧!
Phoebe菲比
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:159 积分:1009 威望:0 精华:0 注册:2021/8/17 15:39:00
  发帖心情 Post By:2022/3/30 10:49:00 [显示全部帖子]

0
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试项目-订单.zip


 回到顶部
美女呀,离线,留言给我吧!
Phoebe菲比
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:159 积分:1009 威望:0 精华:0 注册:2021/8/17 15:39:00
  发帖心情 Post By:2022/3/30 11:28:00 [显示全部帖子]

最后的单据查询窗口,我现在已经改成您发给我带%的代码。用messagebox调试出来还是会出现截图的窗口,这样是对的吗?


 回到顶部
总数 12 1 2 下一页