511遇见易语言数组操作删除成员方法封装函数
生活随笔
收集整理的這篇文章主要介紹了
511遇见易语言数组操作删除成员方法封装函数
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
本課視頻教程主要是把刪除指定成員的的兩種方法進行了封裝,通過調用子程序來實現。
511遇見易語言教程
視頻教程源碼
.版本 2 .支持庫 spec.程序集 窗口程序集_啟動窗口 .程序集變量 集_數組, 文本型, , "0" .程序集變量 集_數組2, 整數型, , "0".子程序 __啟動窗口_創建完畢集_數組 = { “A”, “A”, “A”, “D”, “E”, “F”, “G”, “H”, “I”, “J”, “K” } 集_數組2 = { 1, 1, 1, 3, 4, 5, 6, 7, 8, 9, 10 } ' 采用循環遍歷數組時,如果從后到前,逆向,會一次把重復的成員都刪除 ' 采用判斷循環首時,兩個重復的成員只刪除一個.子程序 _按鈕1_被單擊, , , 刪除成員 .局部變量 數組, 整數型, , "2,3" .局部變量 數組成員數 .局部變量 刪除的數量數組成員數 = 取數組成員數 (數組) 調試輸出 (數組成員數) 刪除的數量 = 刪除成員 (數組, 3, 5) 數組成員數 = 取數組成員數 (數組) 調試輸出 (刪除的數量) 調試輸出 (數組成員數).子程序 _按鈕2_被單擊, , , 刪除成員-1(適合于刪除一個指定成員) .局部變量 數組, 文本型, , "0" .局部變量 總數 .局部變量 m, 整數型數組 = { “B”, “B”, “C”, “D”, “E”, “F”, “G”, “H”, “I”, “J”, “K” } 總數 = 取數組成員數 (數組) .計次循環首 (總數, m) .如果真 (數組 [m] = 編輯框1.內容) 刪除成員 (數組, m, ) 跳出循環 () .如果真結束.計次循環尾 () 調試輸出 (數組).子程序 _按鈕3_被單擊, , , 刪除成員-2(適合于刪除多個指定成員) .局部變量 數組, 文本型, , "0" .局部變量 總數 .局部變量 m, 整數型數組 = { “B”, “B”, “C”, “D”, “E”, “F”, “G”, “H”, “I”, “J” } 總數 = 取數組成員數 (數組) .計次循環首 (總數, 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 .局部變量 ni = 取數組成員數 (參_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遇见易语言数组操作删除成员方法封装函数的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 旅游风景区`web大作业 静态网页
- 下一篇: 王俊杰:5G为零售带来“五新”发展机遇