Foxtable(狐表)用户栏目专家坐堂 → 截取函数问题


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

主题:截取函数问题

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


加好友 发短信
等级:小狐 帖子:394 积分:6003 威望:0 精华:0 注册:2015/2/17 10:18:00
截取函数问题  发帖心情 Post By:2015/7/14 18:39:00 [只看该作者]

A表有身份证列
用身份证筛选,代码如下:

With e.Form.Controls("TEXTBOX2")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If 
        Filter = Filter & "身份证 = '" & .Value & "'"
        End If
End With

请教,我想用身份证后4位数筛选,如何用SUBSTRING()改写如上代码,谢谢!




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


加好友 发短信
等级:小狐 帖子:394 积分:6003 威望:0 精华:0 注册:2015/2/17 10:18:00
  发帖心情 Post By:2015/7/14 19:04:00 [只看该作者]

查了下,好像用 Filter = Filter & "身份证 Like '%" & . Value & "%'"  比截取更方便,不过,截取函数还是有的地方可用得上

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/14 19:11:00 [只看该作者]

Filter = Filter & "Substring(身份证,len(身份证)-3,4) = '" & .Value & "'"

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


加好友 发短信
等级:小狐 帖子:394 积分:6003 威望:0 精华:0 注册:2015/2/17 10:18:00
  发帖心情 Post By:2015/7/14 19:44:00 [只看该作者]

谢谢!

 回到顶部