terse

这样行不？

@echo off&setlocal enabledelayedexpansion
for /l %%i in (0 1 9) do set %%i=%%i
    for /f "delims=" %%i in (1.txt) do set "str=%%i"&call:lp
    pause&goto :eof
:lp
set/a n+=1
set var=!str:~-%n%,1!
if defined !var! (set str2=!var!!str2!&set lp=lp) else (
    if not defined lp (set str1=!var!!str1!) else (
    set/a str2*=7&set str=!str:~,-%n%!!var!!str2!!str1!
    >>b.txt echo !str!
    for %%i in (str1 str2 n lp) do set %%i=
    goto :eof
    ))
    goto lp
复制代码

terse

原帖由 pusofalse 于 2008-8-7 21:20 发表
7楼代码简洁，但感觉效率不如6楼。

何以见得呢？
你把上面的内容COPY 100次后测试看看

terse

原帖由 pusofalse 于 2008-8-8 05:55 发表
@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (a.txt) do (
     set "str="%%a""&set n=0
     for /l %%i in (0 1 9) do (
         set "str=!str:#%%i=#" "%%i!"
         set "str ...

还是替换效率高
如最后一列数字前有两个空格就处理不了  看代码没处理两个空格
譬如：
#1#  #  4072.0###52.19###  #  504## #