VB .NET 如使用 Base64 加解密

'=== 加密字串 ===
Dim base64Str As String = System.Convert.ToBase64String(System.Text.UnicodeEncoding.Unicode.GetBytes("要加密的字串"))

'=== 解密字串 ===
Dim str As String =System.Text.UnicodeEncoding.Unicode.GetString(System.Convert.FromBase64String("要解密的字串") )