取以逗号分隔的字符串

[smilegw]

字符串为"10,20,30,20,50"
将以逗号隔开的数字分别取到一个整型数组中，求方法

[woods]

写个函数！调用函数时参数：as_Separator =“，”
/******************************************************************************/
//函数名： gf_Split
//功能说明：解析字符串序列
//输入参数：1、as_Sequence 待解析的字符序列
// 2。as_Separator 分隔符
//输出参数：1. as_Str[] 解析后得到的字符串数组（注意参数调用方式）
//返回值： 0_成功 -1_失败
//函数完成：woods
//调用关系：本函数为公共外部函数，可被系统开发的任何地方调用
/******************************************************************************/
Long ll_len //字符长度
long i,j
String ls_Sequence
String ls_Separator
integer li_position

ls_Sequence = as_Sequence
ls_Separator= as_Separator

//取字符串长度
ll_len=len(ls_Sequence)

j=1

for i=1 to ll_len
li_position=pos(ls_Sequence,ls_Separator,i)

if li_position=0 then //没有找到符合要求的位置
as_Str[j]=mid(ls_Sequence,i,ll_len)
exit
elseif li_position=1 then //如果第一个位置为分隔符

else
as_Str[j]=mid(ls_Sequence,i,li_position - i)
j=j+1
end if

i=li_position
next

return 0