【每日一题】链式加法 - 2022.4.28 _ 按键精灵脚本教程

查看: 6116\|回复: 14	[神梦] 【每日一题】链式加法 - 2022.4.28 [复制链接]

神梦科技

神梦无痕

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

1^#

字体大小: t T

发表于 2022-04-28 01:27 | |只看楼主

题目描述

我们的任务是编写一个加法函数add()，接收纯数字作为参数，
并且可以实现一个有趣的链式加法，也就是如果我们调用add(1)(2)(3)可以得到6。

示例：
输入： add(1)，返回：1
输入： add(1)(2)(3)，返回：6

题目难度：中等
题目来源：Training on A Chain adding function | Codewars
题目交流： 584781753

Import "SmAssert.dll"
Function Add(n)
// 您的代码写在这里
End Function
SmAssert Add(1) = 1
SmAssert Add(1)(2) = 3
SmAssert Add(1)(2)(3) = 6

复制代码

参考题解（一）

// 我也没有想出按键精灵中完美的解决方案
// 有个小瑕疵，需要在链式最后面加个空字符串参数
Import "SmAssert.dll"
VBSBegin
'【作者】：神梦无痕
'【ＱＱ】：1042207232
'【Ｑ群】：584781753
Function Add(n)
Execute _
"Class AddChain" & vbCrLf &_
" Private sum" & vbCrLf &_
" Public Default Function add(n)" & vbCrLf &_
" If sum = """" Then sum = """& n &"""" & vbCrLf &_
" If IsNumeric(n) And n <> """" Then" & vbCrLf &_
" sum = sum + n" & vbCrLf &_
" Set add = Me" & vbCrLf &_
" Else" & vbCrLf &_
" add = sum" & vbCrLf &_
" End If" & vbCrLf &_
" End Function" & vbCrLf &_
"End Class" & vbCrLf
Set Add = New AddChain
End Function
VBSEnd
SmAssert Add(1)("") = 1
SmAssert Add(1)(2)("") = 3
SmAssert Add(1)(2)(3)("") = 6

复制代码

参考题解（二）

// 这个解法也需要在链式最后面加个空字符串参数
// 不过相对题解（一）代码量少了很多
Import "SmAssert.dll"
VBSBegin
'【作者】：神梦无痕
'【ＱＱ】：1042207232
'【Ｑ群】：584781753
Dim sum : sum = 0
Function Add(n)
If Len(n) = 0 Then
Add = sum
sum = 0
Else
sum = sum + n
Set Add = GetRef("Add")
End If
End Function
VBSEnd
SmAssert Add(1)("") = 1
SmAssert Add(1)(2)("") = 3
SmAssert Add(1)(2)(3)("") = 6

复制代码

插件下载

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

神梦科技最后编辑于 2022-05-01 11:17:48

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

回顶部

发送短消息 UID 3290475 帖子 22 精华 0 鲜花 24 朵铜币 123 个银币 17 个性别在线时间 280 注册时间 2015-06-06 最后登录 2024-08-04 查看公共资料搜索主题搜索帖子 15324263600 15324263600 组别小学一年级 UID3290475 帖子22 精华0 鲜花24 朵铜币123 个银币17 个在线时间280 注册时间2015-06-06 按键精灵开发者1级可通过提升认证等级来升级勋章：rz.anjian.com	2^# 字体大小: t T 发表于 2022-04-28 06:02 \| \|只看该用户想知道


	回顶部

发送短消息 UID 1187019 帖子 80 精华 0 鲜花 19 朵铜币 171 个银币 95 个性别在线时间 1380 注册时间 2012-06-17 最后登录 2022-07-26 365535162 查看公共资料搜索主题搜索帖子 qqq320320 qqq320320 组别小学四年级 UID1187019 帖子80 精华0 鲜花19 朵铜币171 个银币95 个在线时间1380 注册时间2012-06-17 按键精灵开发者3级可通过提升认证等级来升级勋章：rz.anjian.com	3^# 字体大小: t T 发表于 2022-04-28 09:05 \| \|只看该用户 454 454545


	回顶部

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


	回顶部

发送短消息 UID 969167 帖子 26 精华 0 鲜花 17 朵铜币 62 个银币 21 个性别在线时间 0 注册时间 2012-01-08 最后登录 2022-10-12 396689377 查看公共资料搜索主题搜索帖子 lizhan110 lizhan110 组别小学一年级 UID969167 帖子26 精华0 鲜花17 朵铜币62 个银币21 个在线时间0 注册时间2012-01-08	5^# 字体大小: t T 发表于 2022-04-28 10:41 \| \|只看该用户 111111111


	回顶部

发送短消息 UID 6270760 帖子 1 精华 0 鲜花 1 朵铜币 81 个银币 161 个性别在线时间 0 注册时间 2019-03-19 最后登录 2024-06-13 123456 查看公共资料搜索主题搜索帖子 13606720836 13606720836 组别幼儿园 UID6270760 帖子1 精华0 鲜花1 朵铜币81 个银币161 个在线时间0 注册时间2019-03-19 按键精灵开发者6级可通过提升认证等级来升级勋章：rz.anjian.com	6^# 字体大小: t T 发表于 2022-04-28 16:55 \| \|只看该用户总觉得会大喊大叫的话


	回顶部

发送短消息 UID 6085036 帖子 75 精华 0 鲜花 28 朵铜币 773 个银币 73 个性别在线时间 0 注册时间 2019-01-30 最后登录 2023-03-10 查看公共资料搜索主题搜索帖子按键_小郭组别小学四年级 UID6085036 帖子75 精华0 鲜花28 朵铜币773 个银币73 个在线时间0 注册时间2019-01-30	7^# 字体大小: t T 发表于 2022-04-28 22:34 \| \|只看该用户学习了


	回顶部

发送短消息 UID 1267876 帖子 306 精华 0 鲜花 8 朵铜币 733 个银币 201 个性别在线时间 1600 注册时间 2012-08-11 最后登录 2024-10-05 54916262 查看公共资料搜索主题搜索帖子 chengtian05 chengtian05 组别初中二年级 UID1267876 帖子306 精华0 鲜花8 朵铜币733 个银币201 个在线时间1600 注册时间2012-08-11 按键精灵开发者4级可通过提升认证等级来升级勋章：rz.anjian.com	8^# 字体大小: t T 发表于 2022-04-29 02:32 \| \|只看该用户能回复？


	回顶部

发送短消息 UID 8308745 帖子 218 精华 0 鲜花 98 朵铜币 218 个银币 373 个性别在线时间 0 注册时间 2021-05-27 最后登录 2024-09-01 查看公共资料搜索主题搜索帖子 ouyeah999 皮蛋炒饭组别初中一年级 UID8308745 帖子218 精华0 鲜花98 朵铜币218 个银币373 个在线时间0 注册时间2021-05-27 按键精灵开发者6级可通过提升认证等级来升级勋章：rz.anjian.com	9^# 字体大小: t T 发表于 2022-04-29 12:54 \| \|只看该用户去掉右括号，以左括号为分隔符分隔字符串，然后加起来TracePrint ChainAdd("Add(1)(2)(3)") Function ChainAdd(Str_Input) ChainAdd = 0 Str_Input = Replace(Str_Input, ")", "") Arr = Split(Str_Input, "(") For i = 1 To UBound(Arr) ChainAdd = ChainAdd + CLng(Arr(i)) Next End Function 点评神梦科技另辟蹊径，很不错的想法👍 发表于 2022/4/29 17:38:23
	ouyeah999 最后编辑于 2022-04-29 13:09:16

	回顶部

发送短消息 UID 3773301 帖子 179 精华 0 鲜花 149 朵铜币 -7098 个银币 142 个性别在线时间 1280 注册时间 2016-02-23 最后登录 2024-12-02 592815248 查看公共资料搜索主题搜索帖子 yl321321 yl321321 组别初中一年级 UID3773301 帖子179 精华0 鲜花149 朵铜币-7098 个银币142 个在线时间1280 注册时间2016-02-23 按键精灵开发者2级可通过提升认证等级来升级勋章：rz.anjian.com	10^# 字体大小: t T 发表于 2022-04-29 18:13 \| \|只看该用户 cgbhkjghkj


	回顶部

发送短消息 UID 8023002 帖子 11 精华 0 鲜花 4 朵铜币 21 个银币 11 个性别在线时间 0 注册时间 2020-11-18 最后登录 2023-05-04 12345 查看公共资料搜索主题搜索帖子 17781221769 17781221769 组别小学一年级 UID8023002 帖子11 精华0 鲜花4 朵铜币21 个银币11 个在线时间0 注册时间2020-11-18	11^# 字体大小: t T 发表于 2022-04-30 22:28 \| \|只看该用户学习学习


	回顶部

发送短消息 UID 3328028 帖子 1497 精华 0 鲜花 199 朵铜币 3957 个银币 204 个性别在线时间 26840 注册时间 2015-06-28 最后登录 2024-03-09 查看公共资料搜索主题搜索帖子 zjcyjj zjcyjj 组别大学三年级 UID3328028 帖子1497 精华0 鲜花199 朵铜币3957 个银币204 个在线时间26840 注册时间2015-06-28 小红帽对论坛提出良好建议（可向管理员申请）	12^# 字体大小: t T 发表于 2022-05-03 23:11 \| \|只看该用户用VBS来迂回实现，这脑洞也是6的飞起啊，66666


	回顶部

发送短消息 UID 8522251 帖子 143 精华 0 鲜花 107 朵铜币 134 个银币 109 个性别在线时间 0 注册时间 2021-11-01 最后登录 2024-11-28 12345 查看公共资料搜索主题搜索帖子 0976039722 0976039722 组别小学六年级 UID8522251 帖子143 精华0 鲜花107 朵铜币134 个银币109 个在线时间0 注册时间2021-11-01	13^# 字体大小: t T 发表于 2022-05-14 08:23 \| \|只看该用户 hhhukbiubbu


	回顶部

发送短消息 UID 8723682 帖子 9 精华 0 鲜花 28 朵铜币 19 个银币 14 个性别在线时间 0 注册时间 2022-05-02 最后登录 2024-07-22 查看公共资料搜索主题搜索帖子快乐的小青年组别小学一年级 UID8723682 帖子9 精华0 鲜花28 朵铜币19 个银币14 个在线时间0 注册时间2022-05-02	14^# 字体大小: t T 发表于 2022-09-05 18:00 \| \|只看该用户 .....


	回顶部

发送短消息 UID 9090322 帖子 15 精华 0 鲜花 14 朵铜币 25 个银币 20 个性别在线时间 0 注册时间 2023-07-31 最后登录 2023-10-29 查看公共资料搜索主题搜索帖子 qweqaz1010 组别小学一年级 UID9090322 帖子15 精华0 鲜花14 朵铜币25 个银币20 个在线时间0 注册时间2023-07-31	15^# 字体大小: t T 发表于 2023-10-04 23:04 \| \|只看该用户正在学习中


	回顶部

上一主题| 下一主题

[神梦] 【每日一题】链式加法 - 2022.4.28 [复制链接]

454

点评