請(qǐng)教，易語(yǔ)言，批量取每行中間的文本。源碼？. 版本2。子程序啟動(dòng)子程序，整數(shù)型，此子程序在程序啟動(dòng)后首先執(zhí)行。局部變量文件號(hào)，整數(shù)類(lèi)型。局部變量臨時(shí)文本，文本類(lèi)型文件號(hào)=打開(kāi)的文件（“123。TXT“

請(qǐng)教，易語(yǔ)言，批量取每行中間的文本。源碼？

. 版本2。子程序啟動(dòng)子程序，整數(shù)型，此子程序在程序啟動(dòng)后首先執(zhí)行。局部變量文件號(hào)，整數(shù)類(lèi)型。局部變量臨時(shí)文本，文本類(lèi)型

文件號(hào)=打開(kāi)的文件（“123。TXT“，）

移動(dòng)到文件頭（文件號(hào)）。循環(huán)判斷頭（）

臨時(shí)文本=臨時(shí)文本+檢索文本（讀取一行（文件號(hào)），“，”[“）+#換行符。循環(huán)判斷尾（否定（是否在文件末尾（文件號(hào)，）

輸出調(diào)試文本（臨時(shí)文本）

返回（0）”可以根據(jù)您的需要返回任何值。子程序檢索文本，文本類(lèi)型。參數(shù)搜索文本，文本類(lèi)型。參數(shù)開(kāi)始標(biāo)記，文本類(lèi)型。參數(shù)結(jié)束標(biāo)記，text type

包括標(biāo)記的文本，邏輯類(lèi)型，可為空，默認(rèn)為true。局部變量位置1，整數(shù)類(lèi)型。局部變量位置2，整數(shù)類(lèi)型。局部變量長(zhǎng)度，整數(shù)類(lèi)型。局部變量返回文本，text type

length=采用文本長(zhǎng)度（起始標(biāo)記）。如果為真（空（包括標(biāo)記的文本））

包括標(biāo)記的文本=真。如果為真，結(jié)束

位置1=查找文本（搜索文本，開(kāi)始標(biāo)記，錯(cuò)誤）

位置2=查找文本（搜索文本，結(jié)束標(biāo)記，位置1+長(zhǎng)度，錯(cuò)誤）。If（包括標(biāo)記的文本=true）

return text=取文本的中間部分（搜索的文本，位置1+長(zhǎng)度，位置2-位置1-否則

]return text=取文本的中間部分（搜索的文本，位置1，位置2-位置1）。如果結(jié)束

return（返回文本）

]“---------------------------------------------------------------------------