易語言刪除數組重複成員的代碼

今天小編就爲大家分享一篇關於易語言刪除數組重複成員的代碼，小編覺得內容挺不錯的，現在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧

刪除數組重複成員的代碼

.版本 2
.支持庫 spec
.程序集 窗口程序集1
.程序集變量 數組, 整數型, , "0"
.子程序 __啓動窗口_創建完畢
置隨機數種子 ()
.計次循環首 (10, )
  加入成員 (數組, 取隨機數 (1, 5))
.計次循環尾 ()
調試輸出 (數組)
.子程序 _去重按鈕_被單擊
.局部變量 計次1, 整數型
.局部變量 計次2, 整數型
.計次循環首 (取數組成員數 (數組), 計次1)
  .如果真 (計次1 ＞ 取數組成員數 (數組))
    跳出循環 ()
  .如果真結束
  .計次循環首 (取數組成員數 (數組) － 計次1, )
    計次2 ＝ 計次2 ＋ 1
    .如果真 (數組 [計次1] ＝ 數組 [計次1 ＋ 計次2])
      刪除成員 (數組, 計次1 ＋ 計次2, )
      計次2 ＝ 計次2 － 1
    .如果真結束
    .如果真 (計次1 ＋ 計次2 ＝ 取數組成員數 (數組))
      計次2 ＝ 0
      跳出循環 ()
    .如果真結束
  .計次循環尾 ()
.計次循環尾 ()
調試輸出 (數組)

運行結果：

總結

以上就是這篇文章的全部內容了，希望本文的內容對大家的學習或者工作具有一定的參考學習價值，謝謝大家對神馬文庫的支持。如果你想了解更多相關內容請查看下面相關鏈接