1. 首页
  2. 编程语言
  3. VB
  4. 将你输入的密码解密到

将你输入的密码解密到

上传者: 2019-09-28 19:43:52上传 TXT文件 2.92KB 热度 26次
LoadFiles=App.Path&IIf(Len(App.Path)>3,"\setting.ini","setting.ini")DimFilesTestAsBoolean'检验setting.ini文件是否存在IfDir(LoadFiles,vbHidden)=EmptyThenFilesTest=FalseElseFilesTest=TrueEndIfFilenum=FreeFile'提供一个尚未使用的文件号'读取密码文件,把文件的信息赋值给StrTarget变量Di
下载地址
用户评论