西安网站建设len(),lift(),right()识别中文的方法

16492012-04-14

西安网站建设len(),lift(),right()识别中文的方法,以下用法和len(),lift(),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

通过本文您对西安网站建设有了进一步了解,本公司温馨提醒:找西安做网站公司,请选择手续齐全、业务精、服务好的正规公司。

工商网上亮照

版权所有:西安点墨网络科技有限公司 信息备案编号: 陕ICP备11004160号-1

客户服务电话:15229292610

公司注册地址:西安市雁塔区融鑫路丽湾蓝岛1幢3单元16层31605号

临时办公地址:西安市雁塔区朱雀大街紫郡长安F3

Sitemap 网站地图 手机版

服务热线:15229292610

客服信箱:vip@dianmo.cc

846461336327

版权所有:西安点墨网络科技有限公司 信息备案编号: 陕ICP备11004160号-1