① 製作易語言源碼
.版本 2
.程序集 窗口程序集1
.程序集變數 路徑, 文本型
.程序集變數 內容, 文本型
.子程序 _按鈕1_被單擊
通用對話框1.打開 ()
路徑 = 通用對話框1.文件名
編輯框1.內容 = 路徑
.如果真 (編輯框1.內容 ≠ 「」)
按鈕2.禁止 = 假
編輯框2.禁止 = 假
返回 ()
.如果真結束
.子程序 _按鈕2_被單擊
.如果真 (編輯框2.內容 = 「」)
信息框 (「請輸入要尋找的內容」, 0, 「提示」)
返回 ()
.如果真結束
內容 = 到文本 (讀入文件 (路徑))
.如果 (尋找文本 (內容, 編輯框2.內容, , 假) = -1)
標簽2.標題 = 「沒有找到」
.否則
標簽2.標題 = 「找到了」 ' 要觸發的事件
.如果結束
.子程序 __啟動窗口_創建完畢
按鈕2.禁止 = 真
編輯框2.禁止 = 真
② 易語言的源碼
易語言有這么大的計算量么?
③ 易語言源碼大全
下載地址在 圖片里
④ 易語言源碼
.版本 2
.子程序 _按鈕_生成_被單擊
.計次循環首 (到整數 (編輯框_生成數.內容), )
列表框1.加入項目 (編輯框_前段.內容 + 編輯框_後段.內容 + 「----」 + 編輯框_密碼.內容, )
.計次循環尾 ()
.子程序 _按鈕_復制全部_被單擊
.局部變數 i, 整數型
.局部變數 列表框內容, 文本型, , "100"
編輯框1.加入文本 (「」)
.計次循環首 (列表框1.取項目數 (), i)
列表框內容 [i] = 列表框1.取項目文本 (i - 1)
.計次循環尾 ()
i = 0
.計次循環首 (列表框1.取項目數 (), i)
編輯框1.加入文本 (列表框內容 [i] + #換行符)
.計次循環尾 ()
置剪輯板文本 (編輯框1.內容)
.子程序 _按鈕_復制_被單擊
編輯框1.加入文本 (「」)
編輯框1.加入文本 (列表框1.取項目文本 (列表框1.現行選中項) + #換行符)
置剪輯板文本 (編輯框1.內容)
.子程序 _列表框1_滑鼠右鍵被按下, 邏輯型
.參數 橫向位置, 整數型
.參數 縱向位置, 整數型
.參數 功能鍵狀態, 整數型
彈出菜單 (菜單, , )
.子程序 _復制全部_被選擇
_按鈕_復制全部_被單擊 ()
.子程序 _復制_被選擇
_按鈕_復制_被單擊 ()
⑤ 求一個易語言的源碼
.版本 2
.支持庫 eAPI
.子程序 _按鈕1_被單擊
打開指定網址 (「http://www..com/」)
⑥ e語言源代碼
呵呵,笑!樓主的問題沒說明白,你要的是信息框的API函數還是它的規格寫法??如果是API的話可以用MessageBox函數,有4個參數,第一個參數是信息框父窗口的句柄,第二個是信息框的內容,第三個是信息框的標題,第四個是信息框的按鈕(這里你可以參照E語言裡面的信息框命令的提示):調用格式如下:
.版本
2
.DLL命令
API信息框,
整數型,
"user32.dll",
"MessageBoxA"
.參數
hwnd,
整數型
.參數
lpText,
文本型
.參數
lpCaption,
文本型
.參數
wType,
整數型
寫法:
.版本
2
.子程序
__啟動窗口_創建完畢
API信息框
(_啟動窗口.取窗口句柄
(),
「111」,
「1」,
0)
⑦ 易語言的源碼有問題啊
.版本2
.支持庫internet
.程序集窗口程序集1
.子程序_按鈕1_被單擊
.如果(連接發信伺服器(「smtp.126.com」,25,「eqewwrte」,「49247585」,)=真)
發送郵件(「測試工具發郵件」,編輯框1.內容,「[email protected]」,,,,)
信息框(「發送成功」,0,)
.否則
信息框(「發送失敗」,0,)
如果不成功有可能是你的郵件沒有開通SMTP
⑧ 易語言源代碼
高等代數中這類解可以用:「特解+通解」 的方式來求解的。
如果沒有約束條件的話,很顯然這個方程通解會有無窮多個解。因為這個通解是一個18維空間中的超平面。所以是無窮的。
⑨ 易語言 源碼
.版本 2
.支持庫 shellEx
.支持庫 eAPI
.程序集 窗口程序集1
.子程序 __啟動窗口_創建完畢
注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #Q鍵)
.子程序 _標簽1_反饋事件, 整數型
.參數 參數一, 整數型
.參數 參數二, 整數型
模擬按鍵 (#鍵2, , )
延時 (100)
模擬按鍵 (#鍵1, , )
延時 (100)
模擬按鍵 (#鍵3, , )
只需要在窗口中加一個標簽組件就可以實現你要的功能了!!!
⑩ 易語言,源碼
我這里都可以發的啊
.版本2
.支持庫internet
.如果(連接發信伺服器(「smtp.qq.com」,,「370854532」,「198703250」,)=真)
編輯框1.內容=「連接成功」
編輯框2.內容=發送郵件(「測試郵件除」,「可以刪除」,「[email protected]」,,,「[email protected]」,)
.如果真(編輯框2.內容=「」)
編輯框2.內容=「發送成功」
.如果真結束
斷開發信伺服器()
.否則
編輯框1.內容=「連接失敗」
如果還是發送不了就按步驟排除原因
1,有沒有連接上郵件伺服器
2,有沒有,發送成功,
沒有發送成功的話取發送失敗信息看看什麼原因
3,如果發送成功,但郵件沒有發送出去,那就去郵箱看看提示是什麼原因
釣魚木馬啊!這玩意還是少弄點吧,搞的我天天怕怕的