数组 加入成员 怎么样才不会重复

宇智波·晓易

jiaru-2.1.rar (135.51 KB, 下载次数: 8)

2015-4-23 08:56 上传

点击文件名下载附件

stillness

  

子程序名	返回值类型	公开	备 注
Add
参数名	类 型	参考	可空	数组	备 注
cbo	组合框
item	文本型

变量名	类 型	静态	数组	备 注
i	整数型
len	整数型
found	逻辑型

len ＝ cbo.取项目数 ()
如果真 (len ＞ 0)
变量循环首 (0, len, 1, i)
如果真 (cbo.取项目文本 (i) ＝ item)
found ＝ 真
跳出循环 ()

变量循环尾 ()
如果真 (取反 (found))
cbo.加入项目 (item, )

子程序名	返回值类型	公开	备 注
AddRange
参数名	类 型	参考	可空	数组	备 注
cbo	组合框
items	文本型

变量名	类 型	静态	数组	备 注
len	整数型
i	整数型

len ＝ 取数组下标 (items, 1)
如果真 (len ＞ 0)
计次循环首 (len, i)
Add (items [i])
计次循环尾 ()

.版本 2<br /> <br /> .子程序 Add<br /> .参数 cbo, 组合框<br /> .参数 item, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 len, 整数型<br /> .局部变量 found, 逻辑型<br /> <br /> len ＝ cbo.取项目数 ()<br /> .如果真 (len ＞ 0)<br />     .变量循环首 (0, len, 1, i)<br />         .如果真 (cbo.取项目文本 (i) ＝ item)<br />             found ＝ 真<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .变量循环尾 ()<br /> .如果真结束<br /> .如果真 (取反 (found))<br />     cbo.加入项目 (item, )<br /> .如果真结束<br /> <br /> <br /> .子程序 AddRange<br /> .参数 cbo, 组合框<br /> .参数 items, 文本型, 数组<br /> .局部变量 len, 整数型<br /> .局部变量 i, 整数型<br /> <br /> len ＝ 取数组下标 (items, 1)<br /> .如果真 (len ＞ 0)<br />     .计次循环首 (len, i)<br />         Add (items <i>)<br />     .计次循环尾 ()<br /> .如果真结束

剩下我de孩子气

2个办法要么 加入前 计次循环判断 要么精易模块组数去除重复