如何把多個文字合併成,如何把多個文字文件合併成一個

2021-12-23 21:51:36 字數 1846 閱讀 5682

1樓:

正是因為你覺得copy指令特別複雜,所以拒絕了一個最最簡單、效果最好、一次學習終生受用的好方法:

1、在多個文字所在的目錄下新建一個文字文件,比如:“新建 文字文件.txt”;

2、在這個txt檔案裡寫入如下**:

copy *.txt a.txt

3、儲存這個文字文件並關閉;

4、修改該文件字尾名為bat即改為“新建 文字文件.bat”

5、雙擊執行這個bat檔案,該目錄下即可出現一個合併後的文件“a.txt”

【注意】1、合併的順序是按照多個文字檔案的名稱順序;

2、這個bat最好改名為“合併.bat”,可以按照上述方法,反覆多次使用。

就這麼簡單,沒有亂碼,速度奇快,而且我非常確定,這個世界上沒有任何其他方法比這個方法更好、更簡單、速度更快!!!(哥從dos時代一路走來,電信系碩士)

vb怎樣把多個txt文字檔案合併為一個文字檔案?

2樓:匿名使用者

其實方法有很多,我就列舉常用的兩個吧...

方法一:

迴圈獲得資料夾裡的檔案;

判斷是否為文字檔案;

按行讀取文字檔案;。。。

下面我用dir()函式獲得資料夾裡的檔案,檔案將按“檔名”排序。也可以結合檔案系統來做。

private sub command1_click()

dim folderpath as string, filename as string, fnum1 as integer, fnum2 as integer

dim sl as string

folderpath = "d:\123\"

fnum1 = freefile

open folderpath & "tmp.txt" for output as fnum1

filename = dir(folderpath)

do until filename = ""

if lcase(right(filename, 4)) = ".txt" and filename <> "tmp.txt" then

fnum2 = freefile

open folderpath & filename for input as fnum2

do until eof(fnum2)

line input #fnum2, sl

print #fnum1, sl

loop

print #fnum1,

close #fnum2

end if

filename = dir()

loop

close #fnum1

end sub

方法二:

如果這些文字檔案都是ansi編碼,那麼可以使用命令列的copy語句。

**確實能做到很簡潔,但就沒有靈活性了。其中,檔案將按“檔名”排序。

private sub command1_click()

dim folderpath as string

folderpath = "d:\123\"

shell "cmd.exe /c copy """ & folderpath & "*.txt"" """ & folderpath & "tmp.txt"""

end sub

另外,這種方法可以用bat檔案來實現。

3樓:匿名使用者

txt檔名有規律嗎?比如1.txt 、2.txt 、3.txt....如果是這樣的話就好弄點。。。

如果沒規律可以用通用控制元件返回txt文字的路徑,然後用input把txt內容都讀取出來存入指定的文字就可以了

如何把多個檔案合併成excel檔案

手工操作 資料 匯入外部資料 匯入資料檔案型別選文字檔案,找到需要開啟的文字檔案,進入文字匯入嚮導 分列步驟 選擇分隔符號 選擇空格 選擇跳過哪些列,匯入成功。這個過程你可以錄製 巨集 加快效率。簡單的方法不會,提供個 笨 點的方法吧 1 把txt檔案合成乙個檔案。用dos命令 copy 1.txt...

如何合併多個PDF,如何合併多個 PDF 文件

如何把多個pdf檔案合併成乙個pdf檔案 pdf怎麼合併?怎樣將幾個pdf檔案合併?在日常工作中,我們可能需要會將多個pdf文件合併在一起,相信很多小夥伴在遇到這類問題時,都選擇複製貼上,但有些檔案複製貼上後格式全部是亂的,我們應該怎麼合併pdf檔案呢?如果我們將其合併到一起,不僅使問題迎刃而解,而...

多個段落怎麼合併成段落,word文件多個段落怎麼合併成乙個段落

在word文件中,用刪除鍵delete,將多個段落中的段落標記刪除即可合併成乙個段落。若段落很多,可以通過查詢和替換功能來實現,其具體操作步驟 1 單擊開始 查詢按鈕 2 彈出查詢和替換對話方塊,單擊特殊格式按鈕,在彈出的選項中選擇段落標記 3 切換到替換選項卡,替換為輸入框為空,單擊全部替換即可,...