ute;sCode 待加密字串´sKey 密钥字串(前8位有效)Public Sub DES_Encode(ByRef sCode As Byte, ByVal sKey As String, ByRef bReturn As Byte)Attribute DES_Encode.VB_Description = \"加密 sCode:明文16进制串 ... [阅读全文]