Open V For Binary As #1
M = Space(LOF(1))
Get #1, , M
Close #1
M = Replace(M, vbCrLf, vbLf) '將 回車符+換行符 替換成 換行符，防止誤操作
M = Replace(M, vbCr, vbLf) '將 回車符 替換成 換行符
M = Replace(M, vbLf, vbCrLf) '將 換行符 替換成 回車符+換行符
Kill V
Open V For Binary As #1
Put #1, , M
Close #1
我用上面程式將txt檔案中黑格處理掉，但是當txt檔案大于50M時就會記憶體溢位，誰有好辦法解決
uj5u.com熱心網友回復：
二進制檔案分段讀寫吧.如果你的是文本檔案, 為何要用二進制方式打開? 并且如果真是文本的話, 你還可以按行讀取.
你可以搜索一下VB訪問檔案.
uj5u.com熱心網友回復：
二進制分段處理。M = Space(1024)
uj5u.com熱心網友回復：
M = Space(LOF(1))中字串溢位，我分段處理這段代碼得怎么修改呢？求教！！！
uj5u.com熱心網友回復：
不是告訴你了嗎？不要一下子都讀進來，分段處理。處理一段，寫入新檔案一段。最后洗掉舊檔案，把新檔案改名為舊檔案名。轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/134040.html
標籤：VB基礎類