1. 易語言怎麼讀取文本能的行數
.版本 2
.程序集 窗口程序集1
.子程序 _按鈕1_被單擊
.局部變量 文本長度, 整數型
文本長度 = 取文本長度 (讀入文本 (打開文件 (“F:\123.txt”, #讀入, ), ))
.判斷開始 (取整 (文本長度 ÷ 20) 編輯框1.內容 = 到文本 (取整 (文本長度 ÷ 20) + 1)
.判斷 (取整 (文本長度 ÷ 20) = 文本長度 ÷ 20)
編輯框1.內容 = 到文本 (文本長度 ÷ 20)
.默認
要取行數得知道要以每幾個字符(半角的)為一行,這里假設以每20個字符為一行。
一般分辨率為1024*768的打開記事本后最大化(自動換行的),它每一行就有125個字符(半角的)。
2. 易語言怎麼取指定文本的右邊其他指定長度的文本
.版本 2
.支持庫 spec.子程序 __啟動窗口_創建完畢
.局部變量 循環次數, 整數型
.局部變量 字節, 整數型置隨機數種子 ()
.計次循環首 (26, 循環次數) ' 因為是26個英文字母
字節 = 96 + 循環次數 ' 計算英文字母的字節集
編輯框1.加入文本 (取重復文本 (3, 字符 (字節)) + “=” + 到文本 (取隨機數 (10, 100)) + #換行符)
' 將英文字母的字節集用字符命令轉換成字母,重復3次,取出10-100之間的隨機數
.計次循環尾 ()
調試輸出 (取等號右邊 (“hhh”)) ' 輸出hhh右邊的數.子程序 取等號右邊, 文本型
.參數 等號左邊的內容, 文本型
.局部變量 內容的位置, 整數型內容的位置 = 尋找文本 (編輯框1.內容, 等號左邊的內容, , 假)
.如果真 (內容的位置 ≠ -1) ' 查找等號左邊的內容找到了繼續往下執行 ,沒找到返回空文本
返回 (取文本中間 (編輯框1.內容, 內容的位置 + 取文本長度 (等號左邊的內容) + 1, 2))
.如果真結束
返回 (“”)