/*
函数名称:字符串处理
创建人:岁月明灯
创建时间:2016/12/15
*/
int i,j,k,m,ls_01,ls_02=0
string jj[]
j = 1
m = 1
//参照以下代码,你的全部内容存入str_100, “/”换成你的分隔符,jj[1]就是第一行,jj[2]就是第二行,以此类推
do while j <= str_i + 1
if j <= str_i then
k = pos(str_100,"/",m)
jj[j] = mid(str_100,m,k - m)
else
k = len(str_100)
jj[j] = mid(str_100,m,k - m + 1)
end if
m = k + 1
j = j + 1
loop
ls_01 = 1
do while ls_01 <= upperbound(jj)
if jj[ls_01] = str_01 then
ls_02 =ls_02 +1
end if
ls_01 = ls_01 +1
loop
if ls_02 = 0 then
return false
else
return true
end if