将你输入的密码解密到 LoadFiles=App.Path&IIf(Len(App.Path)>3,"\setting.ini","setting.ini")DimFilesTestAsBoolean'检验setting.ini文件是否存在IfDir(LoadFiles,vbHidden)=EmptyThenFilesT