sp判斷中西混字符串長度

　　sp判斷中西混字符串長度

　　==============================
 函 數 名StringLength
 作    用判斷字符串長度
 參    數需進行判斷的文本Txt
 ==============================
 Private Function StringLength(Txt)
  Txt=Trim(Txt)
  x=Len(Txt)
  y=
  For ii = To x
   If Asc(Mid(Txtii))<= or Asc(Mid(Txtii))> Then
    y=y +
   Else
    y=y +
   End If
  Next
  StringLength=y
 End Function

From:http://tw.wingwit.com/Article/program/net/201311/14205.html