这个对你们不是什么有技术含量的东西。
' 加密1 = 加密数据 (到字节集 (编码_Ansi到Unicode_文本型 (编辑框5.内容)), “2019”, #DES算法)
' 写配置项 (取运行目录 () + “\W.ini”, “W”, “3”, 到文本 (加密1))
写配置项 (取运行目录 () + “\W.ini”, “W”, “3”, 到文本 (加密数据 (到字节集 (编码_Ansi到Unicode_文本型 (编辑框5.内容)), “2019”, #DES算法)))
编辑框10.内容 = 读配置项 (取运行目录 () + “\W.ini”, “W”, “3”, “”)