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


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

主题：根据联系电话号码，知道是那个城市的
帅哥哟，离线，有人找我吗？
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 [显示全部帖子]

谢谢

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04492 秒, 5 次数据查询