超級列表框表項(xiàng)關(guān)鍵字搜索示例
成都創(chuàng)新互聯(lián)公司擁有一支富有激情的企業(yè)網(wǎng)站制作團(tuán)隊(duì),在互聯(lián)網(wǎng)網(wǎng)站建設(shè)行業(yè)深耕10年,專業(yè)且經(jīng)驗(yàn)豐富。10年網(wǎng)站優(yōu)化營銷經(jīng)驗(yàn),我們已為上千多家中小企業(yè)提供了成都網(wǎng)站制作、做網(wǎng)站解決方案,按需求定制制作,設(shè)計滿意,售后服務(wù)無憂。所有客戶皆提供一年免費(fèi)網(wǎng)站維護(hù)!
.版本 2 .支持庫 iext .程序集 啟動窗口程序集 .程序集變量 表項(xiàng)索引, 整數(shù)型 .子程序 _查找表項(xiàng)按鈕_被單擊 .局部變量 臨時文本, 文本型 .局部變量 索引, 整數(shù)型 .局部變量 是否找到, 邏輯型 .局部變量 a, 整數(shù)型 .如果真 (輸入框 (“請輸入需要查找的內(nèi)容”, “查找表項(xiàng)”, “易語言7”, 臨時文本, ) = 真) 是否找到 = 假 .計次循環(huán)首 (超級列表框.取表項(xiàng)數(shù) (), a) 索引 = a - 1 .如果真 (表項(xiàng)關(guān)鍵字搜索 (超級列表框, 索引, 0, 臨時文本) = 真) ' 只是搜索了第1列,需要的話可以通過循環(huán)每項(xiàng)每列讀取 是否找到 = 真 跳出循環(huán) () .如果真結(jié)束 .計次循環(huán)尾 () .如果真 (是否找到 = 假) ' 全部搜索沒找到 彈出信息框 索引 = 0 信息框 (“超級列表框中沒找到” + #換行符 + #換行符 + 臨時文本, 0, “”) .如果真結(jié)束 超級列表框.現(xiàn)行選中項(xiàng) = 索引 超級列表框.保證顯示 (索引) 超級列表框.獲取焦點(diǎn) () .如果真結(jié)束 .子程序 表項(xiàng)關(guān)鍵字搜索, 邏輯型 .參數(shù) 欲搜索超級列表框, 超級列表框 .參數(shù) 欲搜索表項(xiàng)索引, 整數(shù)型 .參數(shù) 欲搜索列索引, 整數(shù)型 .參數(shù) 關(guān)鍵字, 文本型 .局部變量 標(biāo)題文本, 文本型 標(biāo)題文本 = 超級列表框.取標(biāo)題 (欲搜索表項(xiàng)索引, 欲搜索列索引) .如果 (尋找文本 (標(biāo)題文本, 關(guān)鍵字, , 真) = -1) 返回 (假) ' 未找到關(guān)鍵字 .否則 返回 (真) ' 找到關(guān)鍵字 .如果結(jié)束 .子程序 _查找表項(xiàng)數(shù)值按鈕_被單擊 .局部變量 臨時文本, 文本型 .如果真 (輸入框 (“請輸入需要查找的內(nèi)容”, “查找表項(xiàng)數(shù)值”, “14”, 臨時文本, #輸入整數(shù)) = 真) 表項(xiàng)索引 = 超級列表框.查找表項(xiàng)數(shù)值 (0, 到數(shù)值 (臨時文本)) 超級列表框.現(xiàn)行選中項(xiàng) = 表項(xiàng)索引 超級列表框.保證顯示 (表項(xiàng)索引) 超級列表框.獲取焦點(diǎn) () .如果真結(jié)束
運(yùn)行結(jié)果:
總結(jié)
以上就是這篇文章的全部內(nèi)容了,希望本文的內(nèi)容對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價值,謝謝大家對創(chuàng)新互聯(lián)的支持。如果你想了解更多相關(guān)內(nèi)容請查看下面相關(guān)鏈接