如何在VFP中查找汉字的命令,汉字是不定的
我有一个VFP表,现在正在整理中,需高位老师帮忙筛选出含有汉字的纪录。汉字的不定的:如:现配、尼龙管等;
[解决办法]
这是去掉汉字的代码,自行修改
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
[解决办法]
请参考:FAQ-
<取得字符串中双字节(中文和中文符号).英文字母.空格.数字字符和其他字符个数,并显示它们>
http://faq.csdn.net/read/210873.html
帖主,代码都给到份了,自已稍改一下吧。
[解决办法]
&&总结各位高人的思想后,请将下列代码copy--> paste .prg文件
SELECT * FROM tt where rr1(bh)
FUNCTION rr1
PARAMETERS rr
gg=.t.
df = Len(Trim(RR))
rr2=rr
For i = 1 To df
If Asc(subs(rr, i, 1))> =128
gg= .f.
exit
EndIf
endfor
RETURN gg
ENDFUNC