VB.Net Tutorial/Data Type/Base64String — различия между версиями

Материал из VB Эксперт
Перейти к: навигация, поиск
м (1 версия)
 
(нет различий)

Текущая версия на 15:54, 26 мая 2010

Convert string to base64string

<source lang="vbnet">Public Class Tester

   Public Shared Sub Main
       Dim quote As String = "AAAAA"
       Dim quoteBytes As Byte() = System.Text.Encoding.UTF8.GetBytes(quote)
       Dim quote64 As String = Convert.ToBase64String(quoteBytes)
       Dim byteSet As Byte() = Convert.FromBase64String(quote64)
       
       Dim result As String = System.Text.Encoding.UTF8.GetString(byteSet)
       
       Console.WriteLine(quote & vbNewLine & quote64 & vbNewLine & result)
   End Sub

End Class</source>

AAAAA
QUFBQUE=
AAAAA