查看: 10689|回复: 410	[分享脚本] 提取字符串数字,中文,字母 [复制链接]

发送短消息 UID 1390367 帖子 2025 积分 2019 鲜花 360 朵 铜币 4761 个 银币 910 个 金币 0 个 性别 最后登录 2018-09-24 82591558 查看公共资料 搜索主题 搜索帖子 383698358 脚本订做QQ:82591558 组别实名接单作者 UID1390367 帖子2025 鲜花360 朵 铜币4761 个 银币910 个 金币0 个 注册时间2013-08-23 剑侠勋章 剑侠世界公测活动勋章 过大年勋章 俩小福娃给大家拜年啦！ 双十一绝版纪念勋章 双十一绝版纪念勋章 单身汪勋章 单身贵族的专属勋章 按键14周年庆纪念勋章 按键14周年庆纪念勋章（360天） 按键卫士（90天） 参与“打击山寨，维护按键”活动 按键图书勋章 尊贵的按键图书用户 骨灰级按键用户 3年以上的按键论坛用户 按键精灵开发者6级 可通过提升认证等级来升级勋章：rz.anjian.com 小红帽 对论坛提出良好建议（可向管理员申请） 爱心大使 积极帮助新手（可向管理员进行申请） 学有所成 学有所成勋章，新手步入按键学堂的第一枚勋章 脚本作者 商业小精灵作者绑定账号后自动赠送	1# 字体大小: t T 发表于 2016-04-06 18:25 | |只看楼主 大家写脚本的时候都会遇到要识别地图跟坐标,这个时候提取字符串就很重要了. 下面的给的函数可以直接调用,返回值就是过滤好的字符串了 Function ENumber(str)'提取数字 Dim i ENumber = "" For i = 1 To Len(str) If 58 > Asc(Mid(str, i, 1)) > 47 Then ENumber = ENumber & Mid(str, i, 1) End If Next End Function Function EChinese(str)'提取中文 Dim i EChinese = "" For i = 1 To Len(str) If - 2049 > Asc(Mid(str, i, 1)) > - 20320 Then EChinese = EChinese & Mid(str, i, 1) End If Next End Function Function ELetter(str)'提取所有大小写字母 Dim i ELetter = "" For i = 1 To Len(str) If 91 > Asc(Mid(str, i, 1)) > 64 Or 123 > Asc(Mid(str, i, 1)) > 96 Then ELetter = ELetter & Mid(str, i, 1) End If Next End Function Function ELLetter(str)'提取小写字母 Dim i ELLetter = "" For i = 1 To Len(str) If 123 > Asc(Mid(str, i, 1)) > 96 Then ELLetter = ELLetter & Mid(str, i, 1) End If Next End Function Function ECLetter(str)'提取大写字母 Dim i ECLetter = "" For i = 1 To Len(str) If 91 > Asc(Mid(str, i, 1)) > 64 Then ECLetter = ECLetter & Mid(str, i, 1) End If Next End Function 复制代码 如果觉得对你有帮助,请把你的鲜花留下,给作者更多的动力分享更好的代码
	383698358 最后编辑于 2016-04-21 22:09:46 点赞 代写各种脚本 : 电脑-安卓-IOS-模拟器 ; 游戏-办公-网页等 联系QQ82591558
	回顶部

发送短消息 UID 1074574 帖子 174 积分 170 鲜花 16 朵 铜币 713 个 银币 0 个 金币 0 个 性别 最后登录 2017-03-04 757768093 查看公共资料 搜索主题 搜索帖子 aodahuo aodahuo 组别初中一年级 UID1074574 帖子174 鲜花16 朵 铜币713 个 银币0 个 金币0 个 注册时间2012-04-02	2# 字体大小: t T 发表于 2016-04-27 17:28 | |只看该用户 学习学习
	回顶部

发送短消息 UID 3853752 帖子 86 积分 75 鲜花 0 朵 铜币 114 个 银币 0 个 金币 0 个 性别 最后登录 2016-05-04 12344 查看公共资料 搜索主题 搜索帖子 hity hity 组别小学四年级 UID3853752 帖子86 鲜花0 朵 铜币114 个 银币0 个 金币0 个 注册时间2016-04-07	3# 字体大小: t T 发表于 2016-04-28 13:13 | |只看该用户 415345
	回顶部

发送短消息 UID 660428 帖子 46 积分 39 鲜花 0 朵 铜币 76 个 银币 0 个 金币 0 个 性别 最后登录 2016-05-29 595048236 查看公共资料 搜索主题 搜索帖子 lizj595 lizj595 组别小学二年级 UID660428 帖子46 鲜花0 朵 铜币76 个 银币0 个 金币0 个 注册时间2011-05-15 按键精灵开发者1级 可通过提升认证等级来升级勋章：rz.anjian.com	4# 字体大小: t T 发表于 2016-04-28 17:47 | |只看该用户 把你的鲜花留下,
	回顶部

发送短消息 UID 3904444 帖子 170 积分 170 鲜花 0 朵 铜币 440 个 银币 0 个 金币 0 个 性别 最后登录 2018-08-04 查看公共资料 搜索主题 搜索帖子 mgfaker 层层 组别初中一年级 UID3904444 帖子170 鲜花0 朵 铜币440 个 银币0 个 金币0 个 注册时间2016-05-07	5# 字体大小: t T 发表于 2016-05-22 01:45 | |只看该用户 1111111111111
	回顶部

发送短消息 UID 3928145 帖子 40 积分 40 鲜花 0 朵 铜币 69 个 银币 0 个 金币 0 个 性别 最后登录 2016-07-25 查看公共资料 搜索主题 搜索帖子 yuezhan50 组别小学二年级 UID3928145 帖子40 鲜花0 朵 铜币69 个 银币0 个 金币0 个 注册时间2016-05-20	6# 字体大小: t T 发表于 2016-05-22 12:57 | |只看该用户 考虑考虑
	回顶部

发送短消息 UID 3239277 帖子 689 积分 687 鲜花 66 朵 铜币 5656 个 银币 0 个 金币 0 个 性别 最后登录 2018-09-24 查看公共资料 搜索主题 搜索帖子 bnphupai bnphupai 组别高中三年级 UID3239277 帖子689 鲜花66 朵 铜币5656 个 银币0 个 金币0 个 注册时间2015-05-08 脚本作者 商业小精灵作者绑定账号后自动赠送	7# 字体大小: t T 发表于 2016-05-27 21:27 | |只看该用户 大家写脚本的时候都会遇到要识别地图跟坐标,这个时候提取字符串就很重要了.
	回顶部

发送短消息 UID 3942284 帖子 5 积分 5 鲜花 0 朵 铜币 33 个 银币 0 个 金币 0 个 性别 最后登录 2016-07-16 查看公共资料 搜索主题 搜索帖子 youkongwojiulai 组别小学一年级 UID3942284 帖子5 鲜花0 朵 铜币33 个 银币0 个 金币0 个 注册时间2016-05-28	8# 字体大小: t T 发表于 2016-05-28 22:23 | |只看该用户 学习提取字符串
	回顶部

发送短消息 UID 3942024 帖子 36 积分 36 鲜花 0 朵 铜币 67 个 银币 0 个 金币 0 个 性别 最后登录 2018-09-04 查看公共资料 搜索主题 搜索帖子 sunqua 组别小学二年级 UID3942024 帖子36 鲜花0 朵 铜币67 个 银币0 个 金币0 个 注册时间2016-05-28	9# 字体大小: t T 发表于 2016-05-28 22:33 | |只看该用户 111111111111111
	回顶部

发送短消息 UID 351023 帖子 96 积分 94 鲜花 0 朵 铜币 78 个 银币 14 个 金币 0 个 性别 最后登录 2018-01-15 364351194 查看公共资料 搜索主题 搜索帖子 sddzhyc sddzhyc 组别小学五年级 UID351023 帖子96 鲜花0 朵 铜币78 个 银币14 个 金币0 个 注册时间2010-01-23 盒子会员 盒子会员专属勋章 按键会员（月） 按键会员绑定账号后自动赠送	10# 字体大小: t T 发表于 2016-06-03 20:29 | |只看该用户 提取字符串数字,中文,字母修改
	回顶部

发送短消息 UID 3951852 帖子 33 积分 33 鲜花 0 朵 铜币 106 个 银币 0 个 金币 0 个 性别 最后登录 2016-07-05 查看公共资料 搜索主题 搜索帖子 yufd1986 组别小学二年级 UID3951852 帖子33 鲜花0 朵 铜币106 个 银币0 个 金币0 个 注册时间2016-06-03	11# 字体大小: t T 发表于 2016-06-04 09:18 | |只看该用户 看看先
	回顶部

发送短消息 UID 3910934 帖子 466 积分 465 鲜花 3 朵 铜币 1686 个 银币 0 个 金币 0 个 性别 最后登录 2018-09-13 查看公共资料 搜索主题 搜索帖子 tllzxptt 组别高中一年级 UID3910934 帖子466 鲜花3 朵 铜币1686 个 银币0 个 金币0 个 注册时间2016-05-11	12# 字体大小: t T 发表于 2016-06-20 16:08 | |只看该用户 hhhhhhhhhhhhhhhhhhhhhhhhhhh
	回顶部

发送短消息 UID 3957942 帖子 260 积分 260 鲜花 1 朵 铜币 414 个 银币 5 个 金币 0 个 性别 最后登录 2016-08-14 307046313 查看公共资料 搜索主题 搜索帖子 bai197777 大叔 组别按键精灵会员 UID3957942 帖子260 鲜花1 朵 铜币414 个 银币5 个 金币0 个 注册时间2016-06-07	13# 字体大小: t T 发表于 2016-06-22 20:20 | |只看该用户 gjvfgjjbv
	回顶部

发送短消息 UID 3975078 帖子 19 积分 19 鲜花 0 朵 铜币 74 个 银币 0 个 金币 0 个 性别 最后登录 2016-06-25 12345 查看公共资料 搜索主题 搜索帖子 15996954520 望洋兴叹 组别小学一年级 UID3975078 帖子19 鲜花0 朵 铜币74 个 银币0 个 金币0 个 注册时间2016-06-18	14# 字体大小: t T 发表于 2016-06-22 20:40 | |只看该用户
	回顶部

发送短消息 UID 298048 帖子 619 积分 619 鲜花 37 朵 铜币 483 个 银币 323 个 金币 1 个 性别 最后登录 2018-07-24 8366962 查看公共资料 搜索主题 搜索帖子 dc02999 dc02999 组别高中二年级 UID298048 帖子619 鲜花37 朵 铜币483 个 银币323 个 金币1 个 注册时间2009-08-12 脚本作者 商业小精灵作者绑定账号后自动赠送 按键会员（季） 按键会员绑定账号后自动赠送 按键会员（年） 按键会员绑定账号后自动赠送 学有所成 学有所成勋章，新手步入按键学堂的第一枚勋章 按键精灵开发者4级 可通过提升认证等级来升级勋章：rz.anjian.com	15# 字体大小: t T 发表于 2016-06-22 21:31 | |只看该用户 谢谢楼主分享
	人的梦想是不会终结的！！！
	回顶部

发送短消息 UID 190929 帖子 123 积分 110 鲜花 0 朵 铜币 329 个 银币 0 个 金币 0 个 性别 最后登录 2016-12-02 查看公共资料 搜索主题 搜索帖子 61972612 61972612 组别小学六年级 UID190929 帖子123 鲜花0 朵 铜币329 个 银币0 个 金币0 个 注册时间2008-08-20	16# 字体大小: t T 发表于 2016-06-23 01:29 | |只看该用户 非常需要
	回顶部

发送短消息 UID 1033381 帖子 132 积分 132 鲜花 3 朵 铜币 543 个 银币 0 个 金币 0 个 性别 最后登录 2018-09-23 478311583 查看公共资料 搜索主题 搜索帖子 z478311583 z478311583 组别小学六年级 UID1033381 帖子132 鲜花3 朵 铜币543 个 银币0 个 金币0 个 注册时间2012-03-03	17# 字体大小: t T 发表于 2016-06-23 17:27 | |只看该用户 1231231231
	回顶部

发送短消息 UID 491014 帖子 173 积分 163 鲜花 2 朵 铜币 366 个 银币 6 个 金币 0 个 性别 最后登录 2016-08-10 659177578 查看公共资料 搜索主题 搜索帖子 老实 老实 组别按键精灵会员 UID491014 帖子173 鲜花2 朵 铜币366 个 银币6 个 金币0 个 注册时间2010-08-29 按键会员（季） 按键会员绑定账号后自动赠送	18# 字体大小: t T 发表于 2016-06-24 05:23 | |只看该用户 ...................
	回顶部

发送短消息 UID 3983497 帖子 1 积分 1 鲜花 0 朵 铜币 11 个 银币 0 个 金币 0 个 性别 最后登录 2016-06-24 查看公共资料 搜索主题 搜索帖子 tanfanghong 组别幼儿园 UID3983497 帖子1 鲜花0 朵 铜币11 个 银币0 个 金币0 个 注册时间2016-06-24	19# 字体大小: t T 发表于 2016-06-24 08:23 | |只看该用户 该内容需您回复才可浏览
	回顶部

发送短消息 UID 2260497 帖子 311 积分 311 鲜花 0 朵 铜币 1087 个 银币 0 个 金币 0 个 性别 最后登录 2018-09-15 26713370 查看公共资料 搜索主题 搜索帖子 26713370 26713370 组别初中二年级 UID2260497 帖子311 鲜花0 朵 铜币1087 个 银币0 个 金币0 个 注册时间2013-11-17 按键精灵开发者2级 可通过提升认证等级来升级勋章：rz.anjian.com	20# 字体大小: t T 发表于 2016-06-24 20:53 | |只看该用户 提取字符串
	回顶部