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

文本(文件)数据问题 | 2015-11-04 22:58:32 | 阅读 1467 次 | 评论(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条
游客请输入验证码
浏览192888次
最新评论