1樓:匿名使用者
請您先在易語言中新增元件編輯框1、按鈕1和超文字瀏覽框1,再把下面的**複製到**編輯區裡。
.版本 2
.支援庫 htmlview
.支援庫 internet
.程式集 視窗程式集
.子程式 __啟動視窗_建立完畢
超文字瀏覽框1.地址 = “http://www.baidu.com”
.子程式 取指定內容, 文字型
.引數 完整內容, 文字型
.引數 左邊文字, 文字型
.引數 右邊文字, 文字型
.區域性變數 臨時位置, 整數型
.區域性變數 內容長度, 整數型
.區域性變數 取出內容, 文字型
內容長度 = 取文字長度 (完整內容)
臨時位置 = 尋找文字 (完整內容, 左邊文字, , 假) + 取文字長度 (左邊文字)
取出內容 = 取文字中間 (完整內容, 臨時位置, 內容長度)
內容長度 = 取文字長度 (取出內容)
臨時位置 = 尋找文字 (取出內容, 右邊文字, , 假) - 1
取出內容 = 取文字中間 (取出內容, 1, 臨時位置)
返回 (取出內容)
.子程式 _按鈕1_被單擊
.區域性變數 文字, 文字型
文字 = 取指定內容 (文字, “”) ' 連線前面有“”,而中間的就是新聞的連線了
.否則文字 = 取指定內容 (文字, “href=” + #引號, #引號 + “>”) ' 這裡比上面的前後各多了引號
.如果結束
2樓:司馬塵戀
.版本 2
.支援庫 htmlview
.支援庫 regex
.支援庫 internet
.支援庫 iconv
.子程式 _按鈕1_被單擊
.子程式 取網頁連結地址, 文字型
.引數 _網頁地址, 文字型
.引數 _連結文字, 文字型
.區域性變數 網頁檔案, 位元組集
.區域性變數 網頁文字, 文字型
.區域性變數 正則, 正規表示式
.區域性變數 結果, 搜尋結果
.區域性變數 結果文字, 文字型
網頁檔案 = http讀檔案 (_網頁地址)
網頁文字 = 到文字 (編碼轉換 (網頁檔案, #編碼_utf_8, #編碼_gb2312, ))
.如果真 (網頁文字 = “”)
網頁文字 = 到文字 (編碼轉換 (網頁檔案, #編碼_utf_8, #編碼_gb18030, ))
.如果真結束
.如果真 (網頁文字 = “”)
網頁文字 = 到文字 (編碼轉換 (網頁檔案, #編碼_utf_8, #編碼_gbk, ))
.如果真結束
.如果真 (網頁文字 = “”)
網頁文字 = 到文字 (網頁檔案)
.如果真結束
.如果真 (網頁文字 = “”)
資訊框 (“網頁內容轉碼失敗!”, #警告圖示, “提示”)
返回 (“”)
.如果真結束
正則.建立 (“]*” + _超連結引號 + “>” + _連結文字 + “”, 假)
結果 = 正則.搜尋 (網頁文字, 1, )
.如果真 (結果.是否為空 ())
資訊框 (“找不到!”, #資訊圖示, “提示”)
返回 (“”)
.如果真結束
結果文字 = 結果.取匹配文字 (網頁文字, )
結果文字 = 子文字替換 (結果文字, “結果文字 = 子文字替換 (結果文字, _超連結引號 + “>” + _連結文字 + “”, , , , 真)
返回 (結果文字)
3樓:匿名使用者
先新增資料庫 然後再按下面的
4樓:8羽毛
http讀檔案
然後把讀回來的網頁源**分割
易語言怎麼讓超文字瀏覽框內顯示**
5樓:就愛時尚
控制元件欄拖入一個超文字瀏覽框到窗體上,名字預設
超文字瀏覽框1.跳轉(**)
樓上的,“直接超文字瀏覽框.地址”可能會出錯,我這樣絕對不會
6樓:匿名使用者
超文字瀏覽框1.地址 = “http://zhidao.
易語言中怎麼用超文字瀏覽框開啟連結
7樓:何小東
那樣的話就不要用超級連結框。
用個標籤,標籤單機事件:超文字瀏覽框內1.地址=www.baidu.com
當然了,用超級連結框也容
可以,但是你不要填地址,就把它的被單擊事件寫:超文字瀏覽框1.地址=www.baidu.com
8樓:我的未來
輸入**:
.版本 2
.支援庫 htmlview
.子程式 _超文字瀏覽框1_即將開啟新視窗, 邏輯型超文字瀏覽框1.地址 = 超文字瀏覽框1.狀態條文字
易語言編輯框1文字插入編輯框2文字之後換行還可以插入下一句,怎樣做呢
還可以插入下抄一句?版本 2 子程式 啟動視窗 建立完畢 子程式 按鈕1 被單擊 編輯框1.加入文字 編輯框2.內容 編輯框1.加入文字 換行符 寫到檔案 文字.txt 到位元組集 編輯框1.內容 子程式 啟動視窗 建立完畢 編輯框1.加入文字 編輯框2.內容 編輯框2.加入文字 換行符 子程式 按...
易語言怎麼實現按住按鍵之後在編輯框不停的輸入「1」鬆開之後停止輸入
版本 2 程式集 視窗程式集1 程式集變數 s stop,邏輯型 子程式 按鈕2 滑鼠左鍵被按下,邏輯型.引數 橫向位置,整數型 引數 縱向位置,整數型 引數 功能鍵狀態,整數型 區域性變數 n,整數型 s stop 真 判斷迴圈首 s stop n n 1 編輯框1.內容 編輯框1.內容 取文字右...
易語言如何知道陣列最後有效下標,易語言 如何知道陣列最後一個有效下標
陣列是這樣的,你定義1000陣列,如果給其賦值了,如 陣列 值1 值2 值3 值4 值5 裡邊只有5個值,內用 取陣列成員數 容陣列 就只有5個,而不是1000,如果你是用 加入成員 陣列,值1 加入成員 陣列,值2 加入成員 陣列,值3 加入成員 陣列,值4 加入成員 陣列,值5 這樣,取陣列成員...