1.10.12.15.17.20问题

[sunlei_rxsoft]

我想把上面类型的字符串分开来，例如：1,10,12,15,17,20，怎么办，我有很多这样的字符串；

[eviler]

想分就分呗，但是你也要有个规则啊

[liubocy]

string ls_str, ls_array[]
int i

ls_str = '1,10,12,15,17,20' + ','
do while pos(ls_str, ',') > 0
i ++
ls_array[i] = left(ls_str, pos(ls_str, ',') - 1 )
ls_str = mid( ls_str, pos(ls_str, ',') + 1 )
loop

[javaxi]

//大概也可以这样
//(none) uf_split(string as_str, ref string[] as_str_arr)
int i
i = upperbound(as_str_arr) + 1
if pos(as_str, ',') > 0
as_str_arr[upperbound(as_str_arr) + 1] = left(ls_str, pos(ls_str, ',') - 1 )
uf_split(mid( as_str, pos(as_str, ',') + 1 ), as_str_arr)
else
return
end if

[jjoulejcc]

是撒，有规律就能分

[rightyeah]

自己定义一个split函数，以后再也不愁了

global type split from function_object
end type

forward prototypes
global function integer split (string as_string, string as_separator, ref string as_array[])
end prototypes

global function integer split (string as_string, string as_separator, ref string as_array[]);string ls,sep
long i,lpos,p,ln
sep=as_separator
ls=as_string+sep

i=1
lpos=1
ln=len(sep)

p=pos(ls,sep,lpos)
do while p>0
	as_array[i]=mid(ls,lpos,p - lpos)
	lpos=p+ln
	i++
	p=pos(ls,sep,lpos)
loop
return i -1

end function