从品牌网站建设到网络营销策划,从策略到执行的一站式服务
这篇文章给大家介绍VB.NET中有哪些字符转换函数,内容非常详细,感兴趣的小伙伴们可以参考借鉴,希望对大家能有所帮助。
让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:域名申请、网络空间、营销软件、网站建设、朝天网站维护、网站推广。
VB.NET字符转换代码操作实例:
Public Function ToSBC()Function
ToSBC(ByVal input As String)
As String '转全角
Dim c As Char() = input.
ToCharArray
Dim i As Integer = 0
While i < c.Length
If c(i) = ChrW(32) Then
c(i) = ChrW(12288)
ElseIf AscW(c(i)) < 127 Then
c(i) = ChrW((AscW(c(i)) + 65248))
End If
System.Math.Min(System.Threading.
Interlocked.Increment(i), i - 1)End While
Return New String(c)
End Function
Public Function ToDBC()Function
ToDBC(ByVal input As String)
As String '转半角Dim c As Char() = input.ToCharArray
Dim i As Integer = 0
While i < c.Length
If AscW(c(i)) = 12288 Then
c(i) = ChrW(32)
ElseIf AscW(c(i)) > 65280 AndAlso
AscW(c(i)) < 65375 Thenc(i) = ChrW(AscW(c(i)) - 65248)
End If
System.Math.Min(System.Threading.
Interlocked.Increment(i), i - 1)End While
Return New String(c)
End Function
关于VB.NET中有哪些字符转换函数就分享到这里了,希望以上内容可以对大家有一定的帮助,可以学到更多知识。如果觉得文章不错,可以把它分享出去让更多的人看到。
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图