'バイト型配列"bytesData"に文字列データが入っているものとする Dim str As String 'Shift JISとして文字列に変換 str = System.Text.Encoding.GetEncoding(932).GetString(bytesData) 'JISとして変換 str = System.Text.Encoding.GetEncoding(50220).GetString(bytesData) 'EUCとして変換 str = System.Text.Encoding.GetEncoding(51932).GetString(bytesData) 'UTF-8として変換 str = System.Text.Encoding.UTF8.GetString(bytesData) '結果を表示 Console.WriteLine(str)