Foxtable(狐表)用户栏目专家坐堂 → [求助]文本框


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

主题:[求助]文本框

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


加好友 发短信
等级:五尾狐 帖子:1018 积分:6800 威望:0 精华:0 注册:2014/2/12 20:14:00
[求助]文本框  发帖心情 Post By:2024/10/18 9:00:00 [显示全部帖子]

老师好
     下面是文本框输入字符查询的代码,我想在输入字符后自动生成一个空格再输入来回输入6组字符6个空格,现在想请老师帮忙,谢谢。
Dim txt As String = e.Sender.Text
Dim tbl As Table = Tables("号码_Table1")
Dim aa() As String = txt.Split(" ")
Dim s As String = "1=1 "
For Each a As String In aa
    s = s & " and 号码_红球 Like '%" & a & "%'"
Next
tbl.Filter = s


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


加好友 发短信
等级:五尾狐 帖子:1018 积分:6800 威望:0 精华:0 注册:2014/2/12 20:14:00
  发帖心情 Post By:2024/10/18 11:32:00 [显示全部帖子]

老师,我想输入2个字符后生成一个空格。

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


加好友 发短信
等级:五尾狐 帖子:1018 积分:6800 威望:0 精华:0 注册:2014/2/12 20:14:00
  发帖心情 Post By:2024/10/18 13:12:00 [显示全部帖子]

老师,报错。


图片点击可在新窗口打开查看此主题相关图片如下:2024-10-18 12 33 44.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:五尾狐 帖子:1018 积分:6800 威望:0 精华:0 注册:2014/2/12 20:14:00
  发帖心情 Post By:2024/10/18 14:31:00 [显示全部帖子]

谢谢老师!

 回到顶部