Ⅰ 有誰知道怎麼把易語言源碼製作成,軟體成品
把這個寫好後,最後生成出來的程序有以上填寫的描述信息在屬性裡面。
Ⅱ 求如何修改易語言源碼過程,
修改易語言源碼過程:
在你的電腦上安裝一個易語言
→
得到你想修改的易語言源碼(*.e格式的文件)
→
用易語言打開源碼文件
→
改成你希望的效果
→
保存文件
→
關閉易語言.
就是這么簡單.
Ⅲ 求易語言源碼大全1500多個的源碼!!下載地址-百度網盤
源碼5000
鏈接:
密碼:2ms0
Ⅳ 易語言源碼是什麼
就是 文件名.e的文件 用這個文件 可以修改程序的功能 界面等 把它改寫成你自己的程序 如果你想學習易語言推薦去赤血學院 學習一下 哪裡成套的視頻教程 可以讓你快速入門。
Ⅳ 易語言如何獲取網頁源碼的並展示出來
.版本2
.支持庫RegEx
.支持庫internet
.支持庫iext
.子程序_按鈕1_被單擊
.局部變數網頁文本,文本型
.局部變數表達式,正則表達式
.局部變數搜索結果,搜索結果,,"0"
.局部變數計次變數,整數型
.局部變數文本,文本型
網頁文本=到文本(HTTP讀文件(編輯框1.內容))
網頁文本=子文本替換(網頁文本,#引號,「'」,0,,真)
網頁文本=到小寫(網頁文本)
透明標簽1.標題=取中間文(網頁文本,「<title>」,「</title>」)
表達式.創建(「meta(.*?)>」,假)
搜索結果=表達式.搜索全部(網頁文本)
.計次循環首(取數組成員數(搜索結果),計次變數)
文本=搜索結果[計次變數].取子匹配文本(網頁文本,1,)
.判斷開始(尋找文本(文本,「name='keywords'」,1,假)>0)
透明標簽2.標題=取中間文(文本,「content='」,「'」)
.判斷(尋找文本(文本,「name='description'」,1,假)>0)
透明標簽3.標題=取中間文(文本,「content='」,「'」)
.默認
.判斷結束
.計次循環尾()
.子程序取中間文,文本型
.參數全文,文本型
.參數左文,文本型
.參數右文,文本型
.局部變數位置,整數型
.局部變數總長度,整數型
.局部變數文本,文本型
總長度=取文本長度(全文)
位置=尋找文本(全文,左文,,假)
.如果真(位置<0)
返回(「」)
.如果真結束
位置=位置+取文本長度(左文)
文本=取文本中間(全文,位置,總長度)
總長度=取文本長度(文本)
位置=尋找文本(文本,右文,,假)-1
.如果真(位置<0)
返回(「」)
.如果真結束
文本=取文本中間(文本,1,位置)
返回(文本)
Ⅵ 易語言怎麼獲取網頁源代碼
易語言如何取網頁源碼:
1、首先,運行「易語言」主程序,彈出「新建工程對話框」選擇「Windows窗口程序」然後點擊「確定」按鈕,進入「Windows窗口程序設計界面」。如下圖:
Ⅶ 鎵嬪啓妯℃嫙鍣ㄦ槗璇璦婧愪唬鐮侊紵
鎵嬪啓妯℃嫙鍣ㄦ槸涓涓澶嶆潅鐨勯」鐩錛屼笉瀹規槗鍦ㄦ槗璇璦涓瀹炵幇錛屽洜涓烘槗璇璦涓昏佺敤浜庣紪鍐欐岄潰搴旂敤紼嬪簭錛岃屾ā鎷熷櫒閫氬父闇瑕佸簳灞傜‖浠惰塊棶鍜屽嶆潅鐨勯昏緫澶勭悊銆備互涓嬫槸涓涓闈炲父綆鍖栫殑紺轟緥錛岀敤鏄撹璦緙栧啓鐨勬ā鎷熷櫒錛岀敤浜庢紨紺哄備綍妯℃嫙涓浜涘熀鏈鐨勬墜鍐欒緭鍏ャ
// 瀹氫箟涓涓瀛楃︿覆鍙橀噺鏉ュ瓨鍌ㄦ墜鍐欏唴瀹
鎵嬪啓鍐呭 = ""
// 鍒涘緩涓涓狦UI紿楀彛
紿楀彛 = CreateWindow(0, 0, 800, 600, "鎵嬪啓妯℃嫙鍣", 0)
// 鍒涘緩涓涓鏂囨湰妗嗙敤浜庢樉紺烘墜鍐欏唴瀹
鏂囨湰妗 = CreateEdit(紿楀彛, 20, 20, 760, 400, "")
// 鍒涘緩涓涓鎸夐挳錛岀敤浜庢竻闄ゆ墜鍐欏唴瀹
娓呴櫎鎸夐挳 = CreateButton(紿楀彛, 20, 450, 100, 30, "娓呴櫎")
// 鍒涘緩涓涓鎸夐挳錛岀敤浜庝繚瀛樻墜鍐欏唴瀹
淇濆瓨鎸夐挳 = CreateButton(紿楀彛, 150, 450, 100, 30, "淇濆瓨")
// 鍒涘緩涓涓鐢誨竷錛岀敤浜庢墜鍐欐ā鎷
鐢誨竷 = CreateCanvas(紿楀彛, 20, 500, 760, 80)
// 璁劇疆鐢誨竷鑳屾櫙棰滆壊
CanvasSetBrushColor(鐢誨竷, RGB(255, 255, 255))
CanvasFillRect(鐢誨竷, 0, 0, 760, 80)
// 澶勭悊鎸夐挳鐐瑰嚮浜嬩歡
OnButtonClicked(娓呴櫎鎸夐挳, 娓呴櫎鍐呭)
OnButtonClicked(淇濆瓨鎸夐挳, 淇濆瓨鍐呭)
// 澶勭悊榧犳爣縐誨姩浜嬩歡錛屾ā鎷熸墜鍐
OnMouseMove(鐢誨竷, 鎵嬪啓)
OnMouseLeftDown(鐢誨竷, 鎵嬪啓)
// 鏄劇ず紿楀彛
ShowWindow(紿楀彛)
// 浜嬩歡澶勭悊鍑芥暟錛氶紶鏍囩Щ鍔ㄦ椂妯℃嫙鎵嬪啓
Function 鎵嬪啓(x, y)
if MouseIsDown(0) then
// 鍦ㄧ敾甯冧笂緇樺埗鎵嬪啓鏁堟灉
CanvasSetPenColor(鐢誨竷, RGB(0, 0, 0))
CanvasSetPenWidth(鐢誨竷, 2)
CanvasLineTo(鐢誨竷, x, y)
// 灝嗗潗鏍囧姞鍏ユ墜鍐欏唴瀹
鎵嬪啓鍐呭 = 鎵嬪啓鍐呭 + "X" + Str(x) + "Y" + Str(y) + ","
end if
End Function
// 浜嬩歡澶勭悊鍑芥暟錛氭竻闄ゆ墜鍐欏唴瀹
Function 娓呴櫎鍐呭()
鎵嬪啓鍐呭 = ""
ClearCanvas(鐢誨竷)
End Function
// 浜嬩歡澶勭悊鍑芥暟錛氫繚瀛樻墜鍐欏唴瀹
Function 淇濆瓨鍐呭()
SaveToFile("handwriting.txt", 鎵嬪啓鍐呭)
MessageBox("鎵嬪啓鍐呭瑰凡淇濆瓨鍒 handwriting.txt 鏂囦歡涓銆")
End Function
// 涓誨驚鐜
Do
Sleep(1)
Loop
涓婇潰鐨勪唬鐮佸壋寤轟簡涓涓綆鍗曠殑GUI紿楀彛錛屽叾涓鍖呭惈涓涓鏂囨湰妗嗙敤浜庢樉紺烘墜鍐欏唴瀹廣佷袱涓鎸夐挳錛堟竻闄ゅ拰淇濆瓨錛変互鍙婁竴涓妯℃嫙鎵嬪啓鐨勭敾甯冦傜敤鎴峰彲浠ュ湪鐢誨竷涓婄Щ鍔ㄩ紶鏍囨潵妯℃嫙鎵嬪啓鏁堟灉錛岀劧鍚庨氳繃鎸夐挳鏉ユ竻闄ゆ垨淇濆瓨鎵嬪啓鍐呭廣傛墜鍐欏唴瀹瑰皢淇濆瓨鍒板悕涓 "handwriting.txt" 鐨勬枃浠朵腑銆
璇鋒敞鎰忥紝榪欏彧鏄涓涓闈炲父鍩烘湰鐨勬墜鍐欐ā鎷熷櫒紺轟緥錛屽疄闄呯殑鎵嬪啓妯℃嫙鍣ㄤ細鏇村嶆潅錛屾秹鍙婂埌鏇村氱殑緇樺浘鍜屾墜鍐欒瘑鍒綆楁硶銆傛ゅ栵紝鏄撹璦鍦ㄨ繖鏂歸潰鐨勫姛鑳界浉瀵規湁闄愶紝鍥犳ゅ傛灉闇瑕佹洿楂樼駭鐨勬墜鍐欐ā鎷熷櫒錛屽彲鑳介渶瑕佽冭檻浣跨敤鏇村己澶х殑緙栫▼璇璦鍜屽伐鍏鋒潵瀹炵幇銆