Foxtable(狐表)用户栏目专家坐堂 → 电话号码用星号代替


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

主题:电话号码用星号代替

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


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
电话号码用星号代替  发帖心情 Post By:2019/1/21 18:38:00 [显示全部帖子]

为保护隐私,想把电话号码的中间部份隐藏,用什么函数呢?

比如这一列的数据是这样的
 
张三 1501120121 北京市朝阳区。。。
李小四 1501120121 北京市朝阳区。。。

显示为:

张三 150***121 北京市朝阳区。。。
李小四 150***121 北京市朝阳区。。。

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


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
  发帖心情 Post By:2019/1/21 19:23:00 [显示全部帖子]

有单独的电话号码列,上面是个表达式列

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


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
  发帖心情 Post By:2019/1/21 19:31:00 [显示全部帖子]

用 substr 吗?

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


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
  发帖心情 Post By:2019/1/21 19:41:00 [显示全部帖子]

比如像这样:

Dim s1 As String ="15011201211"
 Dim s2 As String 
Dim s3 As String
dim s4 as string
 s2 = s1.substring(0,3)
s3 = s1.substring(8,3)

s4  = s2 & "***" & s1
结果 s4 = 150***211

 回到顶部