易語言超級編輯框中尋找指定文本並選中的示例

今天小編就爲大家分享一篇關於易語言超級編輯框中尋找指定文本並選中的示例,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧

超級編輯框中尋找指定文本並選中

.版本 2
.支持庫 iext2
.程序集 窗口程序集1
.子程序 __啓動窗口_創建完畢
.子程序 取字符數, 整數型
.參數 文本, 文本型
.局部變量 長度, 整數型
.局部變量 個數, 整數型
.局部變量 字符位置, 整數型
長度 = 取文本長度 (文本)
個數 = 長度
字符位置 = 1
.判斷循環首 (字符位置 < 長度)
  .如果 (取代碼 (取文本中間 (文本, 字符位置, 1), ) < 0 或 取代碼 (取文本中間 (文本, 字符位置, 1), ) = 13)
    個數 = 個數 - 1
    字符位置 = 字符位置 + 2
  .否則
    字符位置 = 字符位置 + 1
  .如果結束
.判斷循環尾 ()
返回 (個數)
.子程序 _按鈕_尋找文本_被單擊
.局部變量 字符位置, 整數型
.局部變量 文本, 文本型
超級編輯框_文本.獲取焦點 ()
字符位置 = 尋找文本 (超級編輯框_文本.內容, 編輯框_輸入要尋找的文本.內容, , 假)
.如果真 (字符位置 ≠ -1)
  文本 = 取文本左邊 (超級編輯框_文本.內容, 字符位置 - 1)
  超級編輯框_文本.起始選擇位置 = 取字符數 (文本)
  超級編輯框_文本.被選擇字符數 = 取字符數 (編輯框_輸入要尋找的文本.內容)
.如果真結束

運行結果:

總結

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

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