VB.NET編程語言的出現，在一定程度上改變了編程人員的開發方式，提高了開發人員程序開發效率。在實際編程中，對于字符的操作是比較常見的。這里為大家帶來的就是VB.NET字符轉換的相關實現方法。#t#

VB.NET字符轉換代碼操作實例:

1. Public Function ToSBC()Function 
   ToSBC(ByVal input As String) 
   As String '轉全角  
2. Dim c As Char() = input.
   ToCharArray  
3. Dim i As Integer = 0 
4. While i < c.Length 
5. If c(i) = ChrW(32) Then  
6. c(i) = ChrW(12288)  
7. ElseIf AscW(c(i)) < 127 Then  
8. c(i) = ChrW((AscW(c(i)) + 65248))  
9. 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 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 

VB.NET字符轉換相關實現操作就為大家介紹到這里。