提取字符串中的数字并求出平均值

文本(文件)数据问题 | 2015-11-04 22:58:32 | 1129次阅读 | 0评
clear
cstr="abc32skfkj262ksf8k99kfsk24kf"
cstr1=""
ncount=0
nsum=0
ok=.f.
for i=1 to len(cstr)
    a=substr(cstr,i,1)
    if isdigit(a)=.t.
        cstr1=cstr1+a
        ok=.t.
    else
        if ok=.t.
            nsum=nsum+val(cstr1)
            cstr1=""
            ok=.f.
            ncount=ncount+1
        endif
    endif
endfor
?"平均值=",nsum/ncount
博友评论,共0条
浏览156266次