你这说的太笼统了, 如果就按照你这样,硬套也能套成功,而且前面变化的数字又没规律,下面是vbs脚本,你试试看
dim n,m
n=0:m=0
set Fso=createobject("scripting.filesystemobject")
set f=Fso.openTextFile("a.txt",1)
set fs=Fso.createtextfile("b.txt",true)
while f.atendofstream <> true
n=n+1
if n=1 then
fs.writeline f.readline
end if
m=m+1
if m=1 then
fs.writeline replace(f.readline,"0.02","0.021")
elseif m=2 then
fs.writeline replace(f.readline,"0.03","0.031")
elseif m=3 then
fs.writeline replace(f.readline,"0.04","0.044")
else
fs.writeline replace(f.readline,"0.05","0.052")
end if
wend