去掉字符串在的汉字
在VF中我怎样去掉字段 "规格型号 "中的汉字:
比如:前板组件JUZ6176005
要得到的结果为:JUZ6176005
[解决办法]
lcString= '前板组件JUZ6176005 '
FOR I=1 TO LEN(lcString)
IF ISLEADBYTE(SUBSTR(lcString,I,1)) &&中文(中文及中文符号是双字节)
I=I+1
LOOP
ELSE
EXIT
ENDIF
ENDFOR
?SUBSTR(lcString,I)
[解决办法]
SELECT *,rr1(bh) FROM tt
FUNCTION rr1
PARAMETERS rr
gg= " "
df = Len(Trim(RR))
rr2=rr
For i = 1 To df
If !(Asc(subs(rr, i, 2)) < 0 Or Asc(subs(rr, i, 2)) > 255) Then
hb1 = subs(rr, 1, 2)
gg = gg + subs(rr, i, 1)
EndIf
NEXT
RETURN gg
ENDFUNC