UC知道统计字符的 VBS 里, Function 语句的疑惑
来源：百度知道 编辑：UC知道 时间：2024/05/04 22:43:51
以下代码是从 test.txt 里返回字符"1" 出现的次数
我对于 function 语句,有很大的疑惑,请大家帮我解释一下
function 语句,让我知道以下代码是什么原理可以得到 字符串 出现的次数
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
我对于 function 语句,有很大的疑惑,请大家帮我解释一下
function 语句,让我知道以下代码是什么原理可以得到 字符串 出现的次数
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
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) '利用查找同时把得到的位置数给变量T
tongji=tongji+1 '找到一次加1
loop until t=0 '当t=0时退出循环，也就是找不到“1”的时候
end function '结束自定义含数
'哈哈，不知道明白了没有，别望了采纳啊