好湿?好紧?好多水好爽自慰,久久久噜久噜久久综合,成人做爰A片免费看黄冈,机机对机机30分钟无遮挡

主頁 > 知識庫 > ASP 支持中文的len(),left(),right()的函數代碼

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=StrleftTest_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_StrStrright
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 字符串截取函數

標簽：普洱 雅安 巴彥淖爾 運城 通遼 鷹潭 通化 荊門

巨人網絡通訊聲明：本文標題《ASP 支持中文的len(),left(),right()的函數代碼》，本文關鍵詞  ASP,支持,中文,的,len,left,；如發現本文內容存在版權問題，煩請提供相關信息告之我們，我們將及時溝通與處理。本站內容系統采集于網絡，涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《ASP 支持中文的len(),left(),right()的函數代碼》相關的同類信息！
  • 本頁收集關于ASP 支持中文的len(),left(),right()的函數代碼的相關信息資訊供網民參考！
    • 推薦文章