刪除陣列中重複的成員應用比較廣泛，比如我們要乙個資料庫中重複的成員刪除，這裡的刪除嚴格講應當是去除陣列中重複的成員。
511遇見易語言教程
.版本 2
.支援庫 spec
.程式集 視窗程式集_啟動視窗
.子程式 __啟動視窗_建立完畢
.子程式 _按鈕1_被單擊, , , 刪除陣列重複成員
.區域性變數 成員
.區域性變數 a, , , "0"
.區域性變數 m, 整數型
.區域性變數 i, 整數型
.區域性變數 n, 整數型
.區域性變數 文字, 文字型
置隨機數種子 ()
編輯框2.內容 ＝ 「」
.計次迴圈首 (10, m)
成員 ＝ 多項選擇 (取隨機數 (1, 10), 1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
加入成員 (a, 成員)
編輯框2.內容 ＝ 編輯框2.內容 ＋ 到文字 (a [m]) ＋ #換行符
.計次迴圈尾 ()
除錯輸出 (a)
' 先計次迴圈，讓每乙個陣列成員進行除自身外的匹配對比
' 先是外部計次迴圈，順序寫出單一的陣列成員
' 內部用變數迴圈首 ，關鍵（i+1），排除自身，進行匹配，匹配成功就刪除，從而去除了重複成員
.' 計次迴圈首 (取陣列成員數 (a), i)
.' 如果真 (取陣列成員數 (a) ＜ i)
' 跳出迴圈 ()
.如果真結束
.' 變數迴圈首 (取陣列成員數 (a), i ＋ 1, -1, n)
.' 如果真 (a [i] ＝ a [n])
' 刪除成員 (a, n, )
.如果真結束
.' 變數迴圈尾 ()
' 文字 ＝ 文字 ＋ 到文字 (a [n]) ＋ #換行符
.' 計次迴圈尾 ()
' 編輯框1.內容 ＝ 文字
子_刪除陣列重複成員1 (a)
除錯輸出 (a)
.子程式 子_刪除陣列重複成員1
.引數 參_陣列, 整數型, 陣列
.區域性變數 i
.區域性變數 n
.區域性變數 文字, 文字型
編輯框1.內容 ＝ 「」
.計次迴圈首 (取陣列成員數 (參_陣列), i)
.如果真 (取陣列成員數 (參_陣列) ＜ i)
跳出迴圈 ()
.如果真結束
.變數迴圈首 (取陣列成員數 (參_陣列), i ＋ 1, -1, n)
.如果真 (參_陣列 [i] ＝ 參_陣列 [n])
刪除成員 (參_陣列, n, )
.如果真結束
.變數迴圈尾 ()
文字 ＝ 文字 ＋ 到文字 (參_陣列 [n]) ＋ #換行符
.計次迴圈尾 ()
編輯框1.內容 ＝ 文字
511遇見易語言教程
511遇見易語言採用計次迴圈刪除陣列中重複成員方法
本課使用了計次迴圈和判斷，對陣列a和陣列b的成員進行不重複比較，方法執行效率較高 511遇見易語言教程 版本 2 支援庫 spec 子程式 按鈕2 被單擊,刪除陣列重複成員 2 區域性變數 成員,整數型 區域性變數 a,整數型,0 區域性變數 m,整數型 區域性變數 i,整數型 區域性變數 n,整數...
511遇見易語言迴圈遍歷刪除陣列中重複成員方法
方法3採用兩次計次迴圈進行遍歷和如果真進行判斷，是最難理解的一種方法，本人感覺沒有方法2好用，這裡作為一種思考講解學習參考。511遇見易語言教程 版本 2 支援庫 spec 子程式 按鈕3 被單擊,刪除陣列重複成員 3 區域性變數 成員,整數型 區域性變數 a,整數型,0 區域性變數 m,整數型 區...
511遇見易語言陣列操作刪除成員方法封裝函式
511遇見易語言教程 版本 2 支援庫 spec 程式集 視窗程式集 啟動視窗 程式集變數 集 陣列,文字型,0 程式集變數 集 陣列2,整數型,0 子程式 啟動視窗 建立完畢 集 陣列 集 陣列2 採用迴圈遍歷陣列時，如果從後到前，逆向，會一次把重複的成員都刪除 採用判斷迴圈首時，兩個重複的成員只...