當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET UTF7Encoding.GetBytes方法代碼示例

本文整理匯總了VB.NET中System.Text.UTF7Encoding.GetBytes方法的典型用法代碼示例。如果您正苦於以下問題:VB.NET UTF7Encoding.GetBytes方法的具體用法?VB.NET UTF7Encoding.GetBytes怎麽用?VB.NET UTF7Encoding.GetBytes使用的例子?那麽, 這裏精選的方法代碼示例或許可以為您提供幫助。您也可以進一步了解該方法所在System.Text.UTF7Encoding的用法示例。


在下文中一共展示了UTF7Encoding.GetBytes方法的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。

示例1: UTF7EncodingExample

' 導入命名空間
Imports System.Text
Imports Microsoft.VisualBasic.strings

Class UTF7EncodingExample
    
    Public Shared Sub Main()
        Dim bytes() As Byte
        ' Unicode characters.
        ' ChrW(35)  = #
        ' ChrW(37)  = %
        ' ChrW(928) = Pi
        ' ChrW(931) = Sigma
        Dim chars() As Char = {ChrW(35), ChrW(37), ChrW(928), ChrW(931)}
        
        Dim utf7 As New UTF7Encoding()
        
        Dim byteCount As Integer = utf7.GetByteCount(chars, 1, 2)
        bytes = New Byte(byteCount - 1) {}
        Dim bytesEncodedCount As Integer = utf7.GetBytes(chars, 1, 2, bytes, 0)
        
        Console.WriteLine("{0} bytes used to encode characters.", bytesEncodedCount)
        
        Console.Write("Encoded bytes: ")
        Dim b As Byte
        For Each b In  bytes
            Console.Write("[{0}]", b)
        Next b
        Console.WriteLine()
    End Sub
End Class
開發者ID:VB.NET開發者,項目名稱:System.Text,代碼行數:31,代碼來源:UTF7Encoding.GetBytes


注:本文中的System.Text.UTF7Encoding.GetBytes方法示例由純淨天空整理自Github/MSDocs等開源代碼及文檔管理平台,相關代碼片段篩選自各路編程大神貢獻的開源項目,源碼版權歸原作者所有,傳播和使用請參考對應項目的License;未經允許,請勿轉載。