
CODE: [Copy to clipboard]如何统计 "1" 出现过几次?12345671234567
12345
CODE: [Copy to clipboard]set fso=createobject("scripting.filesystemobject")
set file=fso.opentextfile("test.txt",1)
a=file.readall
file.close
msgbox tongji(a,"1")
function tongji(a,b)
t=0:tongji=-1
do
t=instr(t+1,a,b)
tongji=tongji+1
loop until t=0
end function
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |