这个完全符合,非常感谢,看来这些函数我还要认真学习一下
以下是引用schtg在2025-4-28 19:17:40的发言:
将第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
将第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
学到了一个小技巧,就是我标红的那一句,谢谢!