.版本 2
.程式集 視窗程式集_啟動視窗
.子程式 __啟動視窗_建立完畢
列表框1.現行選中項 = 0
**_載入 (1)
.子程式 _按鈕1_被單擊
列表框1.加入專案 (編輯框1.內容, )
編輯框1.內容 = 「」
.子程式 _按鈕2_被單擊, , , 不重複加入-1
.如果 (列表框1.選擇 (編輯框1.內容) = -1)
列表框1.加入專案 (編輯框1.內容, )
資訊框 (「新增成功!」, 0, , )
.否則資訊框 (「已經存在【」 + 編輯框1.內容 + 「】請不要重複新增該內容!」, 0, , )
.如果結束
.子程式 _按鈕3_被單擊, , , 不重複加入-2
.如果 (sendmessagea (列表框1.取視窗控制代碼 (), 399, 0, 編輯框1.內容) = -1)
列表框1.加入專案 (編輯框1.內容, )
資訊框 (「新增成功!」, 0, , )
.否則資訊框 (「已經存在【」 + 編輯框1.內容 + 「】請不要重複新增該內容!」, 0, , )
.如果結束
.子程式 _按鈕4_被單擊, , , 不重複加入-3
.區域性變數 i, 整數型
.區域性變數 重複, 邏輯型
.計次迴圈首 (列表框1.取專案數 (), i)
.如果真 (列表框1.取專案文字 (i - 1) = 編輯框1.內容)
重複 = 真
跳出迴圈 ()
.如果真結束
重複 = 假
.計次迴圈尾 ()
.如果 (重複 = 假)
列表框1.加入專案 (編輯框1.內容, )
編輯框1.內容 = 「」
資訊框 (「新增成功!」, 0, , )
.否則資訊框 (「已經存在【」 + 編輯框1.內容 + 「】請不要重複新增該內容!」, 16, , )
.如果結束
原始碼:511遇見易語言教程
易語言列表框防止專案重複加入列表框
易語言組合框去重複到列表框
在輔助開發時,我們需要通過組合框控制一些功能,或者獲取一些資料,比如把組合框裡 的值新增到列表框,這裡就需要去除重複的,以下 實現了這個功能。版本 2 支援庫 spec 支援庫 edatastructure 程式集 視窗程式集 啟動視窗 子程式 按鈕1 被單擊 區域性變數 專案,文字型 專案 組合框...
511遇見易語言教程列表框屬性方法
版本 2 程式集 視窗程式集 啟動視窗 子程式 按鈕1 被單擊 資訊框 列表框1.取專案文字 列表框1.現行選中項 資訊圖示,子程式 按鈕2 被單擊 資訊框 列表框1.取專案文字 到整數 編輯框1.內容 資訊圖示,子程式 按鈕3 被單擊 列表框1.置專案文字 列表框1.現行選中項,編輯框1.內容 子...
易語言超級列表框匯入TXT內容的方法
易語言開發windows程式中,經常需要用到超級列表框處理一些資料。那麼除了在超級列表框開發中新增資料之外,我們還怎麼從txt中匯入內容?下面本教程手把手教您怎麼操作。1.開啟 msandtaj易語言 2.在 易語言 選單欄中,選擇 程式 新建 1.在彈出的 新建 對話方塊中,選擇 windows視...