vb2003 Base64

您想了解 VB2003 中如何进行 Base64 编码和解码吗？在 VB2003 中，可以使用 `System.Convert` 类中的 `ToBase64String` 和 `FromBase64String` 方法进行 Base64 编码和解码。

以下是一个示例代码：

Dim plainText As String = "Hello World!" ' 原始文本
Dim plainBytes As Byte() = System.Text.Encoding.UTF8.GetBytes(plainText) ' 将文本转换为字节数组
Dim base64Text As String = System.Convert.ToBase64String(plainBytes) ' 对字节数组进行 Base64 编码
Dim base64Bytes As Byte() = System.Convert.FromBase64String(base64Text) ' 对 Base64 编码的文本进行解码，得到字节数组
Dim decodedText As String = System.Text.Encoding.UTF8.GetString(base64Bytes) ' 将字节数组转换为文本

Console.WriteLine("Original text: {0}", plainText)
Console.WriteLine("Base64 encoded text: {0}", base64Text)
Console.WriteLine("Decoded text: {0}", decodedText)

输出结果为：

Original text: Hello World!
Base64 encoded text: SGVsbG8gV29ybGQh
Decoded text: Hello World!

希望这可以帮助您！