Foxtable(狐表)用户栏目专家坐堂 → 根据联系电话号码,知道是那个城市的


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

主题:根据联系电话号码,知道是那个城市的

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


加好友 发短信
等级:童狐 帖子:298 积分:2605 威望:0 精华:0 注册:2013/5/22 7:16:00
根据联系电话号码,知道是那个城市的  发帖心情 Post By:2015/5/7 20:59:00 [显示全部帖子]

有个电话号码联系表,要根据电话号码知道是那个城市的,想要用下面的代码实现,就是不行,请哪位高手指点一下,谢谢。
Dim a As String = "01055556666"
Dim b As String
Select Case a
    Case a Like "010*"
        b = "北京"
    Case a Like "021*"
        b = "上海"
    Case a Like "0755*"
        b = "深圳"
    Case Else
        b = "未知城市"
End Select
Output.Show(b)

[此贴子已经被作者于2015/5/7 20:59:42编辑过]

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


加好友 发短信
等级:童狐 帖子:298 积分:2605 威望:0 精华:0 注册:2013/5/22 7:16:00
  发帖心情 Post By:2015/5/7 21:32:00 [显示全部帖子]

但是if好像要嵌套,而且嵌套的比较多,比较烦,有没有什么好的方法,谢谢

[此贴子已经被作者于2015/5/7 21:32:13编辑过]

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


加好友 发短信
等级:童狐 帖子:298 积分:2605 威望:0 精华:0 注册:2013/5/22 7:16:00
  发帖心情 Post By:2015/5/7 22:06:00 [显示全部帖子]

但是号码很多,需要全部加上面吗,谢谢指点

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


加好友 发短信
等级:童狐 帖子:298 积分:2605 威望:0 精华:0 注册:2013/5/22 7:16:00
  发帖心情 Post By:2015/5/8 9:40:00 [显示全部帖子]

谢谢

 回到顶部