[VB.NET] 將字串轉換成位元組

'利用Encoding.Unicode.GetBytes()


Imports System.Text

Module Module1

    Sub Main()
        Console.Write("輸入字串 > ")
        Dim str As String = Console.ReadLine

        Dim bytes() As Byte = Encoding.Unicode.GetBytes(str)
        Dim i As Integer = Encoding.Unicode.GetByteCount(str)

        Console.WriteLine("位元組數={0}", i)
        For Each b As Byte In bytes
            Console.WriteLine("{0:X} ", b)
        Next
        Console.WriteLine()
    End Sub

End Module