哈希对象 去除重复文本 修改帝王法老

cf2006a

  

子程序名	返回值类型	公开	备 注
取数组成员数_ASM	整数型		比系统的快了三分之一.不过这指令本来费不了多少时间...
参数名	类 型	参考	可空	数组	备 注
变量数组	通用型				变量数组

置入代码 ({ 139, 93, 8, 139, 27, 139, 67, 4, 201, 194, 4, 0 })
返回 (0)
' mov ebx,[ebp+8]
' mov ebx,[ebx]
' mov eax,[ebx+4]
' leave
' ret 4

子程序名	返回值类型	公开	备 注
自减_改参	整数型		超过最大值返回最大值  最大值小于或等于0 返回1  递增的值小于0返回1
参数名	类 型	参考	可空	数组	备 注
参_整数	整数型

置入代码 ({ 139, 93, 8, 139, 11, 73, 137, 11, 137, 200, 64, 201, 194, 4, 0 })
返回 (0)

子程序名	返回值类型	公开	备 注
数组_去重复_对象_文本	整数型		去文本数组重复数据，每个数据只留下一个    注：哈希表的应用
参数名	类 型	参考	可空	数组	备 注
文本数组	文本型

变量名	类 型	静态	数组	备 注
X	整数型
键	变体型
空变体型变量	变体型
哈希表	对象

X ＝ 取数组成员数_ASM (文本数组)
哈希表.创建 (“scripting.Dictionary”, )
判断循环首 (X ＞ 1)
键.赋值 (文本数组 [自减_改参 (X)], )
如果 (哈希表.逻辑方法 (“Exists”, 键))
删除成员 (文本数组, X ＋ 1, )
哈希表.方法 (“Add”, 键, 空变体型变量)

判断循环尾 ()
返回 (取数组成员数_ASM (文本数组))

.版本 2<br /> <br /> .子程序 取数组成员数_ASM, 整数型, 公开, 比系统的快了三分之一.不过这指令本来费不了多少时间...<br /> .参数 变量数组, 通用型, 数组, 变量数组<br /> <br /> 置入代码 ({ 139, 93, 8, 139, 27, 139, 67, 4, 201, 194, 4, 0 })<br /> 返回 (0)<br /> ' mov ebx,[ebp+8]<br /> ' mov ebx,[ebx]<br /> ' mov eax,[ebx+4]<br /> ' leave<br /> ' ret 4<br /> <br /> .子程序 自减_改参, 整数型, , 超过最大值返回最大值  最大值小于或等于0 返回1  递增的值小于0返回1<br /> .参数 参_整数, 整数型, 参考<br /> <br /> 置入代码 ({ 139, 93, 8, 139, 11, 73, 137, 11, 137, 200, 64, 201, 194, 4, 0 })<br /> 返回 (0)<br /> <br /> .子程序 数组_去重复_对象_文本, 整数型, 公开, 去文本数组重复数据，每个数据只留下一个    注：哈希表的应用<br /> .参数 文本数组, 文本型, 参考 数组<br /> .局部变量 X, 整数型<br /> .局部变量 键, 变体型<br /> .局部变量 空变体型变量, 变体型<br /> .局部变量 哈希表, 对象<br /> <br /> X ＝ 取数组成员数_ASM (文本数组)<br /> 哈希表.创建 (“scripting.Dictionary”, )<br /> .判断循环首 (X ＞ 1)<br />     键.赋值 (文本数组 [自减_改参 (X)], )<br />     .如果 (哈希表.逻辑方法 (“Exists”, 键))<br />         删除成员 (文本数组, X ＋ 1, )<br />     .否则<br />         哈希表.方法 (“Add”, 键, 空变体型变量)<br />     .如果结束<br /> <br /> .判断循环尾 ()<br /> 返回 (取数组成员数_ASM (文本数组))

鸿运

感谢发布原创作品，一定好好学习，天天向上

ghost12

感谢发布原创作品，一定好好学习，天天向上

醉卧美人膝

支持一下

懒人定制软件

大神，请收下我的膝盖  

学易语言的哦

通用型怎么设置？通用型怎么设置？

天空c

xshn 发表于 2020-12-14 13:08
通用型怎么设置？

复制一个通用的模板

xshn

通用型怎么设置？

喵帕斯和艾希

感谢楼主的分享