易語言超級列表框表項關鍵字搜索代碼示例

今天小編就爲大家分享一篇關於易語言超級列表框表項關鍵字搜索代碼示例,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧

超級列表框表項關鍵字搜索示例

.版本 2
.支持庫 iext
.程序集 啓動窗口程序集
.程序集變量 表項索引, 整數型
.子程序 _查找表項按鈕_被單擊
.局部變量 臨時文本, 文本型
.局部變量 索引, 整數型
.局部變量 是否找到, 邏輯型
.局部變量 a, 整數型
.如果真 (輸入框 (“請輸入需要查找的內容”, “查找表項”, “易語言7”, 臨時文本, ) = 真)
  是否找到 = 假
  .計次循環首 (超級列表框.取表項數 (), a)
    索引 = a - 1
    .如果真 (表項關鍵字搜索 (超級列表框, 索引, 0, 臨時文本) = 真) ' 只是搜索了第1列,需要的話可以通過循環每項每列讀取
      是否找到 = 真
      跳出循環 ()
    .如果真結束
  .計次循環尾 ()
  .如果真 (是否找到 = 假) ' 全部搜索沒找到 彈出信息框
    索引 = 0
    信息框 (“超級列表框中沒找到” + #換行符 + #換行符 + 臨時文本, 0, “”)
  .如果真結束
  超級列表框.現行選中項 = 索引
  超級列表框.保證顯示 (索引)
  超級列表框.獲取焦點 ()
.如果真結束
.子程序 表項關鍵字搜索, 邏輯型
.參數 欲搜索超級列表框, 超級列表框
.參數 欲搜索表項索引, 整數型
.參數 欲搜索列索引, 整數型
.參數 關鍵字, 文本型
.局部變量 標題文本, 文本型
標題文本 = 超級列表框.取標題 (欲搜索表項索引, 欲搜索列索引)
.如果 (尋找文本 (標題文本, 關鍵字, , 真) = -1)
  返回 (假) ' 未找到關鍵字
.否則
  返回 (真) ' 找到關鍵字
.如果結束
.子程序 _查找表項數值按鈕_被單擊
.局部變量 臨時文本, 文本型
.如果真 (輸入框 (“請輸入需要查找的內容”, “查找表項數值”, “14”, 臨時文本, #輸入整數) = 真)
  表項索引 = 超級列表框.查找表項數值 (0, 到數值 (臨時文本))
  超級列表框.現行選中項 = 表項索引
  超級列表框.保證顯示 (表項索引)
  超級列表框.獲取焦點 ()
.如果真結束

運行結果:

總結

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

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章