【每日一题】字串计数 - 2022.4.20 _ 按键精灵脚本教程

查看: 6002\|回复: 10	[神梦] 【每日一题】字串计数 - 2022.4.20 [复制链接]

神梦科技

神梦无痕

组别按键认证大神
UID2699998
帖子3587
精华11
鲜花2173 朵
铜币7386 个
银币1021 个
在线时间91120
注册时间2014-08-23

1^#

字体大小: t T

发表于 2022-04-20 21:05 | |只看楼主

每日题目

给定一个字符串，请编写一个函数，依次先后统计大写字母、小写字母、数字和特殊字符的个数。

【示例】
输入：*'&ABCDabcde12345
输出：[4,5,5,3]
解释：大写字母有4个(ABCD)，小写字母有5个(abcde)，数字有5个(12345)，特殊字符有3个(*’&)

题目难度：简单
题目来源：CodeWars-Simple string characters 13

Import "SmAssert.dll"
Function 字串计数(字符串)
// 您的代码在这里
End Function
SmAssert.That 字串计数("*'&ABCDabcde12345") ,"in", Array(4,5,5,3)
SmAssert.That 字串计数("bgA5<1d-tOwUZTS8yQ") ,"in", Array(7,6,3,2)
SmAssert.That 字串计数("@mw>0=QD-iAx!rp9TaG?o&M%l$34L.nbft") ,"in", Array(7,13,4,10)

复制代码

参考题解

Import "SmAssert.dll"
Function 字串计数(字符串)
'【作者】：神梦无痕
'【ＱＱ】：1042207232
'【Ｑ群】：624655641
Dim Ret(3)
Dim i, s
For i = 1 To Len(字符串)
s = Mid(字符串, i, 1)
If "A" <= s And s <= "Z" Then
Ret(0) = Ret(0) + 1
ElseIf "a" <= s And s <= "z" Then
Ret(1) = Ret(1) + 1
ElseIf "0" <= s And s <= "9" Then
Ret(2) = Ret(2) + 1
Else
Ret(3) = Ret(3) + 1
End If
Next
字串计数 = Ret
End Function
SmAssert.That 字串计数("*'&ABCDabcde12345") ,"in", Array(4,5,5,3)
SmAssert.That 字串计数("bgA5<1d-tOwUZTS8yQ") ,"in", Array(7,6,3,2)
SmAssert.That 字串计数("@mw>0=QD-iAx!rp9TaG?o&M%l$34L.nbft") ,"in", Array(7,13,4,10)

复制代码

【插件下载】

【插件】神梦断言插件 SmAssert.dll，帮助开发者发现业务逻辑错误

神梦科技最后编辑于 2022-04-20 21:25:37

游戏、办公、网页、脚本辅助定制
联系QQ: 1042207232
【命令库】利用IE+Chrome谷歌双核操纵网页填表，支持框架操作
【命令库】按键精灵也玩套接字(Sock)
SMWHff's Blog | 梦痕编程 - 神梦博客

回顶部

发送短消息 UID 5403420 帖子 23 精华 0 鲜花 10 朵铜币 101 个银币 12 个性别在线时间 1160 注册时间 2018-07-18 最后登录 2022-11-05 849192821 查看公共资料搜索主题搜索帖子 15903194902 15903194902 组别小学一年级 UID5403420 帖子23 精华0 鲜花10 朵铜币101 个银币12 个在线时间1160 注册时间2018-07-18	2^# 字体大小: t T 发表于 2022-04-20 21:19 \| \|只看该用户说的都是


	回顶部

发送短消息 UID 4627510 帖子 53 精华 0 鲜花 42 朵铜币 56 个银币 47 个性别在线时间 0 注册时间 2017-09-11 最后登录 2024-01-14 924249945 查看公共资料搜索主题搜索帖子 x924249945 x924249945 组别小学三年级 UID4627510 帖子53 精华0 鲜花42 朵铜币56 个银币47 个在线时间0 注册时间2017-09-11 黄金之翼黄金之翼勋章	3^# 字体大小: t T 发表于 2022-04-21 08:16 \| \|只看该用户我选择用正则匹配


	回顶部

发送短消息 UID 4627510 帖子 53 精华 0 鲜花 42 朵铜币 56 个银币 47 个性别在线时间 0 注册时间 2017-09-11 最后登录 2024-01-14 924249945 查看公共资料搜索主题搜索帖子 x924249945 x924249945 组别小学三年级 UID4627510 帖子53 精华0 鲜花42 朵铜币56 个银币47 个在线时间0 注册时间2017-09-11 黄金之翼黄金之翼勋章	4^# 字体大小: t T 发表于 2022-04-21 08:19 \| \|只看该用户看了大佬的代码，字母A-Z还可以用来比较的吗


	回顶部

发送短消息 UID 703071 帖子 12 精华 0 鲜花 9 朵铜币 22 个银币 12 个性别在线时间 0 注册时间 2011-07-08 最后登录 2024-06-04 719743297 查看公共资料搜索主题搜索帖子 a719743297 a719743297 组别小学一年级 UID703071 帖子12 精华0 鲜花9 朵铜币22 个银币12 个在线时间0 注册时间2011-07-08	5^# 字体大小: t T 发表于 2022-04-21 08:23 \| \|只看该用户厉害了


	回顶部

发送短消息 UID 742060 帖子 2281 精华 5 鲜花 881 朵铜币 10799 个银币 580 个性别在线时间 48300 注册时间 2011-08-18 最后登录 2024-12-23 1915025270 查看公共资料搜索主题搜索帖子山海师山海狮组别按键工程师 UID742060 帖子2281 精华5 鲜花881 朵铜币10799 个银币580 个在线时间48300 注册时间2011-08-18 双十一绝版纪念勋章双十一绝版纪念勋章抗战胜利70周年勋章抗战胜利70周年活动的专属勋章单身汪勋章单身贵族的专属勋章体验先锋勋章新版本体验先锋纪念勋章元旦勋章按键精灵元旦活动纪念勋章按键精灵开发者6级可通过提升认证等级来升级勋章：rz.anjian.com 虎年勋章虎年纪念勋章论坛GG 按键论坛男性用户勋章小红帽对论坛提出良好建议（可向管理员申请）爱心大使积极帮助新手（可向管理员进行申请）学有所成学有所成勋章，新手步入按键学堂的第一枚勋章	6^# 字体大小: t T 发表于 2022-04-21 10:07 \| \|只看该用户简单粗暴，666666


	回顶部

发送短消息 UID 8521920 帖子 21 精华 0 鲜花 16 朵铜币 29 个银币 19 个性别在线时间 0 注册时间 2021-11-01 最后登录 2024-03-10 查看公共资料搜索主题搜索帖子冯来龙组别小学一年级 UID8521920 帖子21 精华0 鲜花16 朵铜币29 个银币19 个在线时间0 注册时间2021-11-01	7^# 字体大小: t T 发表于 2022-05-27 10:08 \| \|只看该用户继续学习


	回顶部

发送短消息 UID 8853193 帖子 7 精华 0 鲜花 3 朵铜币 5 个银币 5 个性别在线时间 0 注册时间 2022-09-21 最后登录 2024-02-26 540737105 查看公共资料搜索主题搜索帖子 a7989200 a7989200 组别小学一年级 UID8853193 帖子7 精华0 鲜花3 朵铜币5 个银币5 个在线时间0 注册时间2022-09-21	8^# 字体大小: t T 发表于 2022-09-22 02:14 \| \|只看该用户 213213321


	回顶部

发送短消息 UID 3035791 帖子 69 精华 0 鲜花 56 朵铜币 78 个银币 58 个性别在线时间 40 注册时间 2015-01-27 最后登录 2024-12-16 12345 查看公共资料搜索主题搜索帖子 7989200 7989200 组别小学三年级 UID3035791 帖子69 精华0 鲜花56 朵铜币78 个银币58 个在线时间40 注册时间2015-01-27	9^# 字体大小: t T 发表于 2023-01-03 10:18 \| \|只看该用户 11121312123


	回顶部

发送短消息 UID 2926720 帖子 28 精华 0 鲜花 16 朵铜币 38 个银币 28 个性别在线时间 0 注册时间 2014-12-08 最后登录 2024-08-10 12345 查看公共资料搜索主题搜索帖子 garychan1212 garychan1212 组别小学一年级 UID2926720 帖子28 精华0 鲜花16 朵铜币38 个银币28 个在线时间0 注册时间2014-12-08	10^# 字体大小: t T 发表于 2023-05-20 21:43 \| \|只看该用户谢谢


	回顶部

发送短消息 UID 9073758 帖子 6 精华 0 鲜花 4 朵铜币 7 个银币 7 个性别在线时间 0 注册时间 2023-07-05 最后登录 2024-11-16 查看公共资料搜索主题搜索帖子 zzhmlsskt 组别小学一年级 UID9073758 帖子6 精华0 鲜花4 朵铜币7 个银币7 个在线时间0 注册时间2023-07-05	11^# 字体大小: t T 发表于 2023-09-04 16:06 \| \|只看该用户可以收到计算机


	回顶部

上一主题| 下一主题

[神梦] 【每日一题】字串计数 - 2022.4.20 [复制链接]