vb中如何对字符串进行加密和解密（有汉字的）
vb中如何对字符串进行加密和解密（有汉字的）
日期：2017-07-26 22:16:25 人气：1
函数没问题, 你的调用方法有问题:
Private Sub Form_Load()
Dim s As String
s = UserCode("1234中文")
Debug.Print s '这里显示出来的就是一串?
Debug.Print UserDeCode(s) '这里显示出来的是加密前的原文了
End
End Sub