511遇見易語言陣列操作刪除成員方法封裝函式

2021-10-07 10:36:44 字數 2490 閱讀 1267

511遇見易語言教程

.版本 2

.支援庫 spec

.程式集 視窗程式集_啟動視窗

.程式集變數 集_陣列, 文字型, , "0"

.程式集變數 集_陣列2, 整數型, , "0"

.子程式 __啟動視窗_建立完畢

集_陣列 =

集_陣列2 =

' 採用迴圈遍歷陣列時,如果從後到前,逆向,會一次把重複的成員都刪除

' 採用判斷迴圈首時,兩個重複的成員只刪除乙個

.子程式 _按鈕1_被單擊, , , 刪除成員

.區域性變數 陣列, 整數型, , "2,3"

.區域性變數 陣列成員數

.區域性變數 刪除的數量

陣列成員數 = 取陣列成員數 (陣列)

除錯輸出 (陣列成員數)

刪除的數量 = 刪除成員 (陣列, 3, 5)

陣列成員數 = 取陣列成員數 (陣列)

除錯輸出 (刪除的數量)

除錯輸出 (陣列成員數)

.子程式 _按鈕2_被單擊, , , 刪除成員-1(適合於刪除乙個指定成員)

.區域性變數 陣列, 文字型, , "0"

.區域性變數 總數

.區域性變數 m, 整數型

陣列 =

總數 = 取陣列成員數 (陣列)

.計次迴圈首 (總數, m)

.如果真 (陣列 [m] = 編輯框1.內容)

刪除成員 (陣列, m, )

跳出迴圈 ()

.如果真結束

.計次迴圈尾 ()

除錯輸出 (陣列)

.子程式 _按鈕3_被單擊, , , 刪除成員-2(適合於刪除多個指定成員)

.區域性變數 陣列, 文字型, , "0"

.區域性變數 總數

.區域性變數 m, 整數型

陣列 =

總數 = 取陣列成員數 (陣列)

.計次迴圈首 (總數, m)

.如果真 (陣列 [總數 + 1 - m] = 「b」)

刪除成員 (陣列, 總數 + 1 - m, )

.如果真結束

.計次迴圈尾 ()

除錯輸出 (陣列)

.子程式 _按鈕4_被單擊, , , 刪除成員-3

.區域性變數 arr, 整數型, , "0"

.區域性變數 i, 整數型

.區域性變數 n, 整數型

加入成員 (arr, 0)

加入成員 (arr, 1)

加入成員 (arr, 2)

加入成員 (arr, 0)

加入成員 (arr, 3)

除錯輸出 (arr)

i = 取陣列成員數 (arr)

n = 1

.判斷迴圈首 (i ≥ n)

.如果 (arr [n] = 0)

刪除成員 (arr, n, )

i = 取陣列成員數 (arr)

n = 1

.否則.如果結束

n = n + 1

.判斷迴圈尾 ()

除錯輸出 (arr)

.子程式 _按鈕5_被單擊, , , 刪除成員-4

子_刪除成員 (集_陣列, 編輯框1.內容)

除錯輸出 (集_陣列)

.子程式 子_刪除成員, , , 一次性刪除重複的資料

.引數 參_account, 文字型, 陣列

.引數 參_name, 文字型

.區域性變數 total, 整數型

.區域性變數 n, 整數型

total = 取陣列成員數 (參_account)

.計次迴圈首 (total, n)

.如果真 (參_account [total + 1 - n] = 參_name)

刪除成員 (參_account, total + 1 - n, )

.如果真結束

.計次迴圈尾 ()

.子程式 子_刪除成員2, , , 具有刪除重複成員的作用,會保留乙個

.引數 參_arr, 整數型, 陣列

.引數 參_name, 整數型

.區域性變數 i

.區域性變數 n

i = 取陣列成員數 (參_arr)

n = 1

.判斷迴圈首 (i ≥ n)

.如果 (參_arr [n] = 參_name)

刪除成員 (參_arr, n, )

i = 取陣列成員數 (參_arr)

n = 1

.否則.如果結束

n = n + 1

.判斷迴圈尾 ()

.子程式 _按鈕6_被單擊, , , 刪除成員-5

子_刪除成員2 (集_陣列2, 到整數 (編輯框1.內容))

除錯輸出 (集_陣列2)

原始碼:易語言教程陣列操作刪除成員方法2(封裝子程式)

511遇見易語言教程

511遇見易語言迴圈遍歷刪除陣列中重複成員方法

方法3採用兩次計次迴圈進行遍歷和如果真進行判斷,是最難理解的一種方法,本人感覺沒有方法2好用,這裡作為一種思考講解學習參考。511遇見易語言教程 版本 2 支援庫 spec 子程式 按鈕3 被單擊,刪除陣列重複成員 3 區域性變數 成員,整數型 區域性變數 a,整數型,0 區域性變數 m,整數型 區...

511遇見易語言易語言命令

了解易語言命令 易語言命令是處理問題一段程式封裝的計算機指令。為了使用計算機計算 處理一些問題,需要把解決問題的方案用計算機指令表達出來,這些指令就是一段程式,將這些程式進行封裝即為命令。乙個命令可以由乙個或多個簡單的命令封裝成乙個功能更加強大的命令。當需要相同作用的功能時,只要呼叫這個命令,就會得...

511遇見易語言分割文字

分割文字是常用的乙個文字操作命令,具體到我們遊戲實戰中,比如分割一些賬號,密碼,那麼這個命令就變的非常好用 511遇見易語言教程 教程全部原始碼 版本 2 支援庫 spec 支援庫 iext 程式集 視窗程式集 啟動視窗 子程式 按鈕1 被單擊,分割文字 區域性變數 返回文字陣列,文字型,0 區域性...