InterceptString()为什么不能区分中文与英文数字?

本文介绍了一种根据字符串中中文和英文数量自动调整截取长度的函数,并针对UTF-8编码下函数无法正确识别的问题提供了修复方案。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

从网上找了一个可以根据字符串中所含中文英文的多少,自动截取字符串长度的函数。
 代码如下:

Function InterceptString(txt,length)
dim x,y,ii
txt
=trim(txt)
= len(txt)
= 0
if x >= 1 then
    
for ii = 1 to x
        
if asc(mid(txt,ii,1)) < 0 or asc(mid(txt,ii,1)) >255 then
            y 
= y + 2
        
else
            y 
= y + 1
        
end if
        
if y >= length then
            txt 
= left(txt,ii) '字符串限长
            exit for
        
end if
    
next
    
if len(txt) < x then
        InterceptString 
= txt & ".."
    
else
        InterceptString 
= txt
    
end if
else
    InterceptString 
= ""
end if
End Function

结果我在使用的时候,发现这个函数根本不能区别中文和英文。

经过一番查找,发现问题出在这一句:

if asc(mid(txt,ii,1)) < 0 or asc(mid(txt,ii,1)) >255 then

因为我的网站使用的是utf-8编码,所以这句应该改为:

if ascW(mid(txt,ii,1)) < 0 or ascW(mid(txt,ii,1)) >255 then

当然如果你用的是gb-2312编码就不需要修改了。

附:
AscW 是为使用 Unicode 字符的 32 位平台提供的。 它返回 Unicode (宽型)字符代码,因此可以避免从 ANSI 到 Unicode 的代码转换。

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值