Vb程序里加密解密写了一个程序但好像不对有没有人帮我看看吗

在vb程序里对一段话加密解密,写了一段程序,不知道对不对,好像有问题,还有&HB0好像是十六进制,但不是很明白是什么意思?

img

img

这段代码仅在不使用Unicode保存字符串的早期VB版本中有效:
按Command1把Text1中输入的带汉字的字符串对应的每个十六进制字节对应字符串显示在Text2中
按Command2把Text2中的十六进制字符串对应字节再转换回带汉字字符串显示在Text3中
其中&HB0是判断如果遇到是汉字的GB2312编码的第一个字节,就将紧跟后面的字节一起转为对应汉字。

在使用Unicode保存字符串的后期VB版本中就不灵了。
如果还要实现相同功能,就得使用StrConv函数将Unicode编码转为GB2312编码和反转。