Foxtable(狐表)用户栏目专家坐堂 → 去掉最后一位字符进行数值筛选


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

主题:去掉最后一位字符进行数值筛选

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


加好友 发短信
等级:三尾狐 帖子:641 积分:5194 威望:0 精华:0 注册:2018/5/19 22:27:00
去掉最后一位字符进行数值筛选  发帖心情 Post By:2018/8/9 15:29:00 [显示全部帖子]

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim dr As DataRow
Dim po As Integer
dr = DataTables("溯源码").SQLFind("子溯源码 ='" & txt & "'" )
If dr Is Nothing Then 
 MessageBox.Show("此子溯源码不存在!") 
  Else    
          DataTables("溯源码").LoadFilter = "子溯源码 = '" & txt & "'" 
          DataTables("溯源码").Load()  
          po = Tables("溯源码").FindRow(dr)'找出该DataRow在Table中的位置
          If po >= 0 Then '如果找到
             Tables("溯源码").Position = po '选定
          End If                       
End If

我想把上面代码修改为: 不比较“子溯源码”最后一位,与txt的值相同;  如“子溯源码” 为123456,只需12345=“txt”

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


加好友 发短信
等级:三尾狐 帖子:641 积分:5194 威望:0 精华:0 注册:2018/5/19 22:27:00
  发帖心情 Post By:2018/8/9 16:02:00 [显示全部帖子]

这样的話输入123,是否也是能找到123456,或1237789?
我需要输入123无效,只能输入12345才能找到123456.也就是说 只能去掉子溯源码最后一位才行

 回到顶部