我的字符串是这样的：（压力：2.5； 材料：铸铁； 管径：250），我需要截取成数组，数组的内容是 2.5  铸铁  250，请问应该怎么弄？其中分号和冒号是固定的

dime A1[3]
C1 = "压力：2.5； 材料：铸铁； 管径：250" + "；"
for i=1 to 3
   A1[i] = STREXTRACT(c1, "：", "；", i)
endfor i

想要这样子？

但是如果不知道有几个分号呢？

C1 = "压力：2.5； 材料：铸铁； 管径：250" + "；"
n = OCCURS("；", C1)
dime A1[n]
for i=1 to n
   A1[i] = STREXTRACT(c1, "：", "；", i)
endfor i

我只是随手写个示例。其实，这种问题，你去问DeepSeek可能更快一些！

是这个意思吗？

clear

cstr = "压力：2.5；材料：铸铁；管径：250"
szzs =  alines(arr,cstr,"；")
for szs = 1 to szzs
    szz = arr(m.szs)
    arr(m.szs) = substr(alltrim(szz),atc("：",szz) + 2,len(alltrim(szz)) - atc("：",szz))
    ? arr(m.szs)
endfor

好的，非常感谢

实在抱歉，现在问题变成这样了：一串字符，如下 “压力：2.5； 材料：铸铁； 管径：250”，我想经过处理变成2个字符串: "压力, 材料, 管径"   "2.5,铸铁,250",请问用vfp怎么实现？

CLEAR
C1 = "；"+"压力：2.5； 材料：铸铁； 管径：250" + "；"
cstr=""
cvle=""
for i=1 to 3
   cstr=cstr + STREXTRACT(c1,"；","：",i) +"，"
endfor i
for i=1 to 3
   cvle=cvle + STREXTRACT(c1,"：","；",i) +"，"
endfor i
? cstr +cvle
这样行不？

我要的不是cstr +cvle，而是cstr和cvle分别显示，您的方法后面分别显示时后面多了一个逗号

将第5楼的代码简单处理一下，即可得到结果。

clear

cstr = "压力：2.5；材料：铸铁；管径：250"
szzs =  alines(arr,cstr,"；")
cstr1 = ""
cstr2 = ""
for szs = 1 to szzs
    szz = arr(m.szs)
    cstr1 = cstr1 + substr(alltrim(szz),1,atc("：",szz) - 1) + iif(szs = szzs,"",",")
    cstr2 = cstr2 + substr(alltrim(szz),atc("：",szz) + 2,len(alltrim(szz)) - atc("：",szz)) + iif(szs = szzs,"",",")
endfor
? cstr1
? cstr2