个人中心
gpt4 book ai didi

ASP 支持中文的len(),left(),right()的函数代码

转载 作者：qq735679552 更新时间：2022-09-29 22:32:09 26 4
gpt4 key购买 nike

CFSDN坚持开源创造价值，我们致力于搭建一个资源共享平台，让每一个IT人在这里找到属于你的精彩世界.

这篇CFSDN的博客文章ASP 支持中文的len(),left(),right()的函数代码由作者收集整理，如果你对这篇文章有兴趣，记得点赞哟.

比如一个汉字也只会算一个字节，在排版时如果全是汉字，好说，反正没什么差别，但是如果被操作的字符串有汉字又有英文字母时，就不方便了，以下三个函数可以代替ASP自带的相关函数。  　　也有注意的地方，如果用在循环中，因不变量“i”也是常用于循环的变量，执行以下函数时，“i”的值会发生变化，如果是调用他的循环中用到相同的变量，会产生未知的结果，请换用其它变量名。  以下用法和len(),left(),right()一样。  程序代码  。

复制代码代码如下

Function Strlength(Str)  Temp_Str=Len(Str)  For I=1 To Temp_Str  Test_Str=(Mid(Str,I,1))  If Asc(Test_Str)>0 Then  Strlength=Strlength+1  Else  Strlength=Strlength+2  End If  Next  End Function  Function Strleft(Str,L)  Temp_Str=Len(Str)  For I=1 To Temp_Str  Test_Str=(Mid(Str,I,1))  Strleft=Strleft&Test_Str  If Asc(Test_Str)>0 Then  lens=lens+1  Else  lens=lens+2  End If  If lens>=L Then Exit For  Next  End Function  Function Strright(Str,L)  Temp_Str=Len(Str)  For i = Temp_Str to 1 step -1  Test_Str=(Mid(Str,I,1))  Strright=Test_Str&Strright  If Asc(Test_Str)>0 Then  lens=lens+1  Else  lens=lens+2  End If  If lens>=L Then Exit For  Next  End Function  。

最后此篇关于ASP 支持中文的len(),left(),right()的函数代码的文章就讲到这里了,如果你想了解更多关于ASP 支持中文的len(),left(),right()的函数代码的内容请搜索CFSDN的文章或继续浏览相关文章，希望大家以后支持我的博客！ 。

26 4 0
文章推荐： asp textarea 多行数组分割处理方法
文章推荐： asp 去除最后一个逗号为空字符串的代码
文章推荐： ASP trim,ltrim,rtrim 去前后空格 函数
文章推荐： asp 数组 重复删除函数(服务器之家增强版)
qq735679552
个人简介

我是一名优秀的程序员,十分优秀！

滴滴打车优惠券免费领取
滴滴打车优惠券
全站热门文章
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com