1樓：湖洋狼
.版本 2
.支援庫 regex
.支援庫 internet
.支援庫 iext
.子程式 _按鈕1_被單擊
.區域性變數 網頁文字, 文字型
.區域性變數 表示式, 正規表示式
.區域性變數 搜尋結果, 搜尋結果, , "0"
.區域性變數 計次變數, 整數型
.區域性變數 文字, 文字型
網頁文字 ＝ 到文字 (http讀檔案 (編輯框1.內容))
網頁文字 ＝ 子文字替換 (網頁文字, #引號, “'”, 0, , 真)
網頁文字 ＝ 到小寫 (網頁文字)
透明標籤1.標題 ＝ 取中間文 (網頁文字, “”, “”)
表示式.建立 (“meta (.*?)>”, 假)
搜尋結果 ＝ 表示式.搜尋全部 (網頁文字)
.計次迴圈首 (取陣列成員數 (搜尋結果), 計次變數)
文字 ＝ 搜尋結果 [計次變數].取子匹配文字 (網頁文字, 1, )
.判斷開始 (尋找文字 (文字, “name='keywords'”, 1, 假) ＞ 0)
透明標籤2.標題 ＝ 取中間文 (文字, “content='”, “'”)
.判斷 (尋找文字 (文字, “name='description'”, 1, 假) ＞ 0)
透明標籤3.標題 ＝ 取中間文 (文字, “content='”, “'”)
.預設.判斷結束
.計次迴圈尾 ()
.子程式 取中間文, 文字型
.引數 全文, 文字型
.引數 左文, 文字型
.引數 右文, 文字型
.區域性變數 位置, 整數型
.區域性變數 總長度, 整數型
.區域性變數 文字, 文字型
總長度 ＝ 取文字長度 (全文)
位置 ＝ 尋找文字 (全文, 左文, , 假)
.如果真 (位置 ＜ 0)
返回 (“”)
.如果真結束
位置 ＝ 位置 ＋ 取文字長度 (左文)
文字 ＝ 取文字中間 (全文, 位置, 總長度)
總長度 ＝ 取文字長度 (文字)
位置 ＝ 尋找文字 (文字, 右文, , 假) － 1
.如果真 (位置 ＜ 0)
返回 (“”)
.如果真結束
文字 ＝ 取文字中間 (文字, 1, 位置)
返回 (文字)
2樓：伍慕雁
可以做到啊！用超文字框
易語言原始碼問題
樓上的能實現，要是用模糊查詢的話，把 如果真 括號裡的 列表框1.取專案文字 aa 1 編輯框1.內容 改成尋找文字 尋找文字 列表框1.取專案文字 aa 1 編輯框1.內容,假 版本 2 子程式 按鈕1 被單擊 區域性變數 aa,整數型 計次迴圈首 列表框1.取專案數 aa 如果真 列表框1.取專...
易語言定時關機，線上等！易語言定時關機原始碼
版本 2 程式集 視窗程式集1 程式集變數 a,日期時間型 程式集變數 啊,文字型 子程式 啟動視窗 建立完畢 時鐘1.時鐘週期 1000 子程式 時鐘1 週期事件 a 取現行時間 輸出除錯文字 取分鐘 a 啊 到文字 到整數 取分鐘 a 30 如果 編輯框1.內容 到文字 取小時 a 且 編輯框2...
易語言 字幕左右來回滾動原始碼 怎樣寫
用標籤 在時鐘裡設定標籤。左邊。版本 2.支援庫 iext 程式集 視窗程式集 啟動視窗。子程式 啟動視窗 建立完畢。寬度 300 透明標籤1.寬度 65 透明標籤1.文字顏色 品紅。透明標籤1.左邊 寬度 透明標籤1.寬度。透明標籤1.標題 我得意地笑 時鐘1.時鐘週期 50 子程式 時鐘1 週期...