易語言文件分割詳解

❶ 易語言 文本如何精確的分割

1、先用「空格」作為分隔符，使用分割文本（）命令把三個欄位分開；
2、使用取文本長度（）和取文本左邊（）兩個命令配合，取出數字

❷ 易語言 分割文本

_按鈕1_被單擊
.局部變數 分割文本, 文本型, , "0"
.局部變數 索引, 整數型
.局部變數 成員數, 整數型
.局部變數 計次, 整數型

分割文本 ＝ 分割文本 (編輯框1.內容, 「|」, )
成員數 ＝ 取數組成員數 (分割文本)
.計次循環首 (成員數, 計次)
.如果真 (尋找文本 (到文本 (成員數 ÷ 2), 「.」, , 假) ＝ -1 且 尋找文本 (到文本 (計次 ÷ 2), 「.」, , 假) ≠ -1)
索引 ＝ 超級列表框1.插入表項 (超級列表框1.取表項數 (), 分割文本 [計次], , , , )
超級列表框1.置標題 (索引, 1, 分割文本 [計次 ＋ 1])
.如果真結束

.計次循環尾 ()

.子程序 _超級列表框1_當前表項被改變
.局部變數 選過表項索引, 整數型, , "0"

選過表項索引 ＝ 超級列表框1.取被選擇表項 ()
編輯框2.內容 ＝ 超級列表框1.取標題 (選過表項索引 [取數組成員數 (選過表項索引)], 0)
編輯框3.內容 ＝ 超級列表框1.取標題 (選過表項索引 [取數組成員數 (選過表項索引)], 1)

❸ 易語言分割文本

沒錯,但是你的文本里邊其實是有空行的.所以這樣...

把那句:

文本 ＝ 分割文本 (編輯框9.內容, #換行符, )
換成:
文本 ＝ 分割文本 (子文本替換 (編輯框9.內容, #換行符 ＋ #換行符, #換行符, , , 真), #換行符, )

❹ 易語言文本分割

.版本 2
.支持庫 xplib
.支持庫 edroptarget
.支持庫 shell
.支持庫 spec
.支持庫 iext5

.程序集 窗口程序集1

.子程序 __啟動窗口_創建完畢

XP風格 (2)
拖放對象1.接收文件 ＝ 真
拖放對象1.注冊拖放控制項 (編輯框_替換源文件.取窗口句柄 ())

.子程序 _按鈕_打開_被單擊
.局部變數 文件號, 整數型
.局部變數 文件名, 文本型

.如果真 (通用對話框_打開.打開 () ＝ 真)
編輯框_源文件路徑.內容 ＝ 通用對話框_打開.文件名
文件號 ＝ 打開文件 (編輯框_源文件路徑.內容, , )
編輯框_文本大小.內容 ＝ 到文本 (四捨五入 (取文件長度 (文件號) ÷ 1024, 2))
關閉文件 (文件號)
文件名 ＝ 取文本中間 (編輯框_源文件路徑.內容, 1, 倒找文本 (編輯框_源文件路徑.內容, 「\」, , 假) － 1)
編輯框_存儲路徑.內容 ＝ 文件名
.如果真結束

.子程序 _按鈕_保存_被單擊
.局部變數 路徑, 文本型

路徑 ＝ 瀏覽文件夾 (「保存到」, 真)
.如果真 (路徑 ＝ 「」)
返回 ()
.如果真結束
編輯框_存儲路徑.內容 ＝ 路徑

.子程序 _按鈕1_被單擊

.如果真 (編輯框_源文件路徑.內容 ＝ 「」 或 編輯框_存儲路徑.內容 ＝ 「」)
信息框 (「請選擇路徑!!」, 64, 「提示」)
返回 ()
.如果真結束
.如果真 (到數值 (編輯框_自定義分割.內容) ＞ 到數值 (編輯框_文本大小.內容) 或 編輯框_自定義分割.內容 ＝ 「0」)
信息框 (「輸入錯誤!!」, 64, 「提示」)
返回 ()
.如果真結束
.如果 (單選框1.選中 ＝ 真)
自定義分割 ()
.否則
平均分割 ()
.如果結束

.子程序 _單選框2_被單擊

.如果真 (單選框2.選中 ＝ 真)
編輯框_自定義分割.禁止 ＝ 真
編輯框_平均分割.禁止 ＝ 假
編輯框_自定義分割.內容 ＝ 「」
編輯框_平均分割.內容 ＝ 「 2」
.如果真結束

.子程序 _單選框1_被單擊

.如果真 (單選框1.選中 ＝ 真)
編輯框_平均分割.禁止 ＝ 真
編輯框_自定義分割.禁止 ＝ 假
編輯框_平均分割.內容 ＝ 「」
.如果真結束

.子程序 自定義分割
.局部變數 自定義_文件號, 整數型
.局部變數 自定義_存放, 文本型
.局部變數 自定義_變數, 整數型
.局部變數 自定義_取文件名, 文本型, , "0"
.局部變數 自定義_取後綴, 文本型, , "0"

.如果真 (編輯框_自定義分割.內容 ＝ 「」)
信息框 (「輸入分割大小!!」, 64, 「提示」)
返回 ()
.如果真結束
自定義_文件號 ＝ 打開文件 (編輯框_源文件路徑.內容, , )
移到文件首 (自定義_文件號)
調試輸出 (四捨五入 (到小數 (編輯框_文本大小.內容), ) ÷ 到數值 (編輯框_自定義分割.內容))
.變數循環首 (1, 四捨五入 (到小數 (編輯框_文本大小.內容) ÷ 到數值 (編輯框_自定義分割.內容), ), 1, 自定義_變數)
自定義_存放 ＝ 到文本 (讀入位元組集 (自定義_文件號, 到數值 (編輯框_自定義分割.內容) × 1024))
' 調試輸出 (自定義_存放)
自定義_取文件名 ＝ 分割文本 (編輯框_源文件路徑.內容, 「\」, )
自定義_取後綴 ＝ 分割文本 (自定義_取文件名 [取數組成員數 (自定義_取文件名)], 「.」, )
寫到文件 (編輯框_存儲路徑.內容 ＋ 「\」 ＋ 自定義_取後綴 [1] ＋ 「_」 ＋ 到文本 (自定義_變數) ＋ 「.txt」, 到位元組集 (自定義_存放))
.變數循環尾 ()
信息框 (「分割完成」, 64, 「提示」)
關閉文件 (自定義_文件號)

.子程序 平均分割
.局部變數 平均_文件號, 整數型
.局部變數 平均_數量, 整數型
.局部變數 平均_計次, 整數型
.局部變數 平均_取文件名, 文本型, , "0"
.局部變數 平均_取後綴, 文本型, , "0"
.局部變數 平均_存放, 文本型

平均_文件號 ＝ 打開文件 (編輯框_源文件路徑.內容, , )
移到文件首 (平均_文件號)
平均_數量 ＝ (取整 (到小數 (編輯框_文本大小.內容)) ＋ 0.4) ÷ 到數值 (編輯框_平均分割.內容)
調試輸出 (平均_數量)
調試輸出 (取整 (到小數 (編輯框_文本大小.內容)) ＋ 0.4)
.計次循環首 (到數值 (編輯框_平均分割.內容), 平均_計次)
平均_存放 ＝ 到文本 (讀入位元組集 (平均_文件號, 平均_數量 × 1024))
平均_取文件名 ＝ 分割文本 (編輯框_源文件路徑.內容, 「\」, )
平均_取後綴 ＝ 分割文本 (平均_取文件名 [取數組成員數 (平均_取文件名)], 「.」, )
寫到文件 (編輯框_存儲路徑.內容 ＋ 「\」 ＋ 平均_取後綴 [1] ＋ 「_」 ＋ 到文本 (平均_計次) ＋ 「.txt」, 到位元組集 (平均_存放))
.計次循環尾 ()
信息框 (「分割完成」, 64, 「提示」)
關閉文件 (平均_文件號)

.子程序 __啟動窗口_將被銷毀

關閉所有文件 ()

' ==========================================================================================

.子程序 _替換_打開_被單擊

.如果真 (通用對話框_打開1.打開 () ＝ 真)
編輯框_替換源文件.內容 ＝ 到文本 (讀入文件 (通用對話框_打開1.文件名))
替換_替換.禁止 ＝ 假
替換_保存.禁止 ＝ 假
.如果真結束

.子程序 _替換_清空_被單擊

編輯框_替換源文件.內容 ＝ 「」

.子程序 _替換_替換_被單擊

載入 (替換, , 假)

.子程序 _替換_保存_被單擊

.如果真 (通用對話框_保存.打開 () ＝ 假)
返回 ()
.如果真結束
寫到文件 (通用對話框_保存.文件名, 到位元組集 (編輯框_替換源文件.內容))

.子程序 _編輯框_替換源文件_按下某鍵, 邏輯型
.參數 鍵代碼, 整數型
.參數 功能鍵狀態, 整數型

.如果真 (鍵代碼 ＝ 65 且 功能鍵狀態 ＝ #Ctrl鍵狀態)
編輯框_替換源文件.獲取焦點 ()
編輯框_替換源文件.起始選擇位置 ＝ 0
編輯框_替換源文件.被選擇字元數 ＝ 取文本長度 (編輯框_替換源文件.內容)
.如果真結束

.子程序 _拖放對象1_得到文件
.參數 接收到的文件路徑, 文本型

編輯框_替換源文件.內容 ＝ 到文本 (讀入文件 (接收到的文件路徑))
.如果真 (編輯框_替換源文件.內容 ≠ 「」)
替換_替換.禁止 ＝ 假
替換_保存.禁止 ＝ 假
.如果真結束

.子程序 _高級選擇夾1_子夾頭被單擊
.參數 子夾索引, 整數型

.如果真 (子夾索引 ＝ 1)
氣球提示框1.彈出提示框 (_啟動窗口.左邊 ＋ 編輯框_替換源文件.左邊 ＋ 50, _啟動窗口.頂邊 ＋ 編輯框_替換源文件.頂邊 ＋ 50, 「可直接拖入文本」, -1, 真)
播放音樂 (「C:\WINDOWS\Media\Windows XP 氣球.wav」, 假)
.如果真結束

.子程序 _編輯框_替換源文件_內容被改變

.如果 (編輯框_替換源文件.內容 ≠ 「」)
替換_替換.禁止 ＝ 假
替換_保存.禁止 ＝ 假
.否則
替換_替換.禁止 ＝ 真
替換_保存.禁止 ＝ 真
.如果結束

❺ 易語言如何分割文本

你是想讀入文件里的文本，然後把裡面的東西放到a和b里，然後再用----分開？
還是已經有了文本，直接放到a和b里，然後再用----分開？
解1：想讀入文件里的文本，然後把裡面的東西放到a和b里，然後再用----分開
.版本 2

.程序集 窗口程序集1
.程序集變數 文件內容, 文本型
.程序集變數 文件數組, 文本型, , "0"

.子程序 _按鈕1_被單擊
.局部變數 i, 整數型

文件內容 ＝ 到文本 (讀入文件 (「文件路徑」))
文件數組 ＝ 分割文本 (文件內容, 「----」, )
.變數循環首 (1, 取數組成員數 (文件數組), 2, i)
組合框1.現行選中項 ＝ 組合框1.加入項目 (文件數組 [i] ＋ 「 密碼：」 ＋ 文件數組 [i ＋ 1], )
.變數循環尾 ()

解2：已經有了文本，直接放到a和b里，然後再用----分開

.版本 2

.程序集 窗口程序集1
.程序集變數 文件內容, 文本型
.程序集變數 文件數組, 文本型, , "0"

.子程序 _按鈕1_被單擊
.局部變數 i, 整數型

文件內容 ＝ #內容
文件數組 ＝ 分割文本 (文件內容, 「----」, )
.變數循環首 (1, 取數組成員數 (文件數組), 2, i)
組合框1.現行選中項 ＝ 組合框1.加入項目 (文件數組 [i] ＋ 「 密碼：」 ＋ 文件數組 [i ＋ 1], )
.變數循環尾 ()

.版本 2

.常量 內容, "用戶名1----密碼"

❻ 易語言文本分割

.版本2

.程序集窗口程序集_啟動窗口

.子程序_按鈕1_被單擊
.局部變數正則,正則表達式類
.局部變數網址,文本型
.局部變數文件名,文本型,,"0"
.局部變數MP4文件名,文本型,,"0"

網址＝「像圖片裡面說的，這個鏈接都會隨時改變但是這中間都有幾位數字，如何把它分割http://abcd3345.com/mp44444/123.mp4到編輯框裡面」

'--------------------------------------------------------精易模塊正則取文本
正則.創建(「h[S]*?(d+).mp4」,網址)
編輯框1.內容＝正則.取子匹配文本(1,1)

'-------------------------------------------------------精易模塊取文本
文件名＝分割文本(網址,「/」,)
編輯框1.內容＝文本_取出中間文本(「/」＋文件名[取數組成員數(文件名)],「/」,「.mp4」)

'--------------------------------------------------------無模塊取文本
文件名＝分割文本(網址,「/」,)
MP4文件名＝分割文本(文件名[取數組成員數(文件名)],「.」,)
編輯框1.內容＝MP4文件名[1]

三個方法,推薦正則,不會出現錯誤.

❼ 易語言把一個TXT文件分割成多個TXT文件，求助

.版本 2
.程序集 窗口程序集1
.子程序 _按鈕1_被單擊
.局部變數 源文件, 文本型
.局部變數 分割, 文本型, , "0"
.局部變數 i, 整數型
.局部變數 o, 整數型
.局部變數 分割好的, 文本型
.局部變數 p, 整數型
源文件 ＝ 到文本 (讀入文件 (「C:\Documents and Settings\Administrator\桌面\教程.txt」))
分割 ＝ 分割文本 (源文件, #換行符, )
.計次循環首 (取數組成員數 (分割), i)
o ＝ o ＋ 1
.如果 (o ＞ 6)
p ＝ p ＋ 1
寫到文件 (取運行目錄 () ＋ 「\」 ＋ 到文本 (p) ＋ 「.txt」, 到位元組集 (分割好的))
分割好的 ＝ 「」
o ＝ 1
.否則
分割好的 ＝ 分割好的 ＋ 分割 [i] ＋ #換行符
.如果結束
.計次循環尾 ()

我也是新手，用文本分割就行了！

❽ 易語言怎麼把文本分割成兩部分。

可以啊。但是你要找出的文本中間的內容，就可以用分割文本命令

調用格式： 〈文本型數組〉 分割文本 （文本型 待分割文本，［文本型 用作分割的文本］，［整數型 要返回的子文本數目］） - 系統核心支持庫->文本操作
英文名稱：split
將指定文本進行分割，返回分割後的一維文本數組。本命令為初級命令。
參數<1>的名稱為「待分割文本」，類型為「文本型（text）」。如果參數值是一個長度為零的文本，則返回一個空數組，即沒有任何成員的數組。
參數<2>的名稱為「用作分割的文本」，類型為「文本型（text）」，可以被省略。參數值用於標識子文本邊界。如果被省略，則默認使用半形逗號字元作為分隔符。如果是一個長度為零的文本，則返回的數組僅包含一個成員，即完整的「待分割文本」。
參數<3>的名稱為「要返回的子文本數目」，類型為「整數型（int）」，可以被省略。如果被省略，則默認返回所有的子文本。

操作系統需求： Windows、Linux

❾ 易語言分割文本

.版本 2
.局部變數 x, 位元組集.局部變數 aa, 文本型, , "0"
x ＝ 讀入文件 (「c:\1.txt」)
aa ＝ 分割文本 (到文本 (x), #換行符, )
編輯框1.內容 ＝ aa [1]
編輯框2.內容 ＝ aa [2]
編輯框3.內容 ＝ aa [3]
編輯框4.內容 ＝ aa [4]
編輯框5.內容 ＝ aa [5]