调试输出没有问题。编译出来就不行了？

汗水人家

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

信息框 (decrypt (“3h48NCZMw5JJjJI54bbmEKN3s+iZsvJN9w9RrKkLx/haxHOOZzeoM2ojtpLjH3Ja4+CcGfty2kmvtd2QvO1RSSFB0cLdNwVWuoj6Jk15eJJbAgqbzUc2hQXrd8lm5iKZQqvp/18NoKQP/PY6/vMYIrO9td/FizWwSvShgU8lOHwRE/6Cy5zefmQ3nUGcBRJy6s09etDijo3G2UeABejwUT6N9LWcsLbIoosM7IXo7ehTg0h3FBLH4ANnSOmRHexis7Z78XDqjtAwQlsQezS5cEf5YcP+484PGXpbfZKG2bidc/ks3+DbS2cdyeGMbXu3evtxcLbFNRODM4KayqXzWi/P0/k37azbK0d60bhcT3wtnvCNVNoP8mJLd15us1AEx/Hq1GGx6T+/aQRhgC5UYcIi+zUae9Du1G9x4J40dKk=”, “1713401624”), 0, , )

子程序名	返回值类型	公开	备 注
decrypt	文本型		hk解密
参数名	类 型	参考	可空	数组	备 注
Data	文本型
sessionId	文本型

变量名	类 型	静态	数组	备 注
Key	文本型
_JP9	整数型
Str	文本型

计次循环首 (取文本长度 (sessionId), _JP9)
如果真 (_JP9 ％ 2 ＝ 0)
Key ＝ Key ＋ 取文本中间 (sessionId, _JP9, 1)

计次循环尾 ()
Str ＝ 编码_Utf8到Ansi (对称解密 (编码_BASE64解码 (Data), 到字节集 (Key), #对称算法_AES_CBC, #数据填充_PKCS7_PADDING, 到字节集 (Key)))
返回 (Str)

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 信息框 (decrypt (“3h48NCZMw5JJjJI54bbmEKN3s+iZsvJN9w9RrKkLx/haxHOOZzeoM2ojtpLjH3Ja4+CcGfty2kmvtd2QvO1RSSFB0cLdNwVWuoj6Jk15eJJbAgqbzUc2hQXrd8lm5iKZQqvp/18NoKQP/PY6/vMYIrO9td/FizWwSvShgU8lOHwRE/6Cy5zefmQ3nUGcBRJy6s09etDijo3G2UeABejwUT6N9LWcsLbIoosM7IXo7ehTg0h3FBLH4ANnSOmRHexis7Z78XDqjtAwQlsQezS5cEf5YcP+484PGXpbfZKG2bidc/ks3+DbS2cdyeGMbXu3evtxcLbFNRODM4KayqXzWi/P0/k37azbK0d60bhcT3wtnvCNVNoP8mJLd15us1AEx/Hq1GGx6T+/aQRhgC5UYcIi+zUae9Du1G9x4J40dKk=”, “1713401624”), 0, , )<br /> <br /> .子程序 decrypt, 文本型, , hk解密<br /> .参数 Data, 文本型<br /> .参数 sessionId, 文本型<br /> .局部变量 Key, 文本型<br /> .局部变量 _JP9, 整数型<br /> .局部变量 Str, 文本型<br /> <br /> .计次循环首 (取文本长度 (sessionId), _JP9)<br />     .如果真 (_JP9 ％ 2 ＝ 0)<br />         Key ＝ Key ＋ 取文本中间 (sessionId, _JP9, 1)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> Str ＝ 编码_Utf8到Ansi (对称解密 (编码_BASE64解码 (Data), 到字节集 (Key), #对称算法_AES_CBC, #数据填充_PKCS7_PADDING, 到字节集 (Key)))<br /> 返回 (Str)

Suky

汗水人家 发表于 2024-4-18 09:41
编译出来乱码。 调试的时候没事、

可能是调试的时候用的视觉组件和编译后用的视觉组件不一样吧


尝试一下：
工具→系统配置→存根→是否使用windows通用组件库   勾去掉  
然后再编译试试

xjqgccq0

经测试 正常  可以换个vs版本编译试试

xjqgccq0

xjqgccq0 发表于 2024-4-18 09:36
经测试 正常  可以换个vs版本编译试试

123.rar (337.88 KB, 下载次数: 2)

2024-4-18 09:37 上传

点击文件名下载附件

yang670555064

编译没问题呀

汗水人家

yang670555064 发表于 2024-4-18 09:39
编译没问题呀

编译出来乱码。 调试的时候没事、

汗水人家

xjqgccq0 发表于 2024-4-18 09:37

编译出来乱码。 调试的时候没事、

yang670555064

汗水人家 发表于 2024-4-18 09:41
编译出来乱码。 调试的时候没事、

重装易语言

汗水人家

yang670555064 发表于 2024-4-18 09:43
重装易语言

万能重装大法嘛  哈哈