这样的加密方式如何查看密码

ytmpgght

  昨天忙里偷闲就看看蓝桥老师的一些资料，正巧有加密的一个语句。

  并自己试着搞一下：

   Private Sub Workbook_Open()      
      Dim i as byte
    For i = 2 To Worksheets.Count
        Worksheets(i).Visible = False
    Next i
     
     
    If InputBox("请输入密码", "密码验证") <> "123" Then
        ThisWorkbook.Close savechanges:=False
    End If

    For i = 2 To Worksheets.Count
         Worksheets(i).Visible = True
    Next i
End Sub


但是这种加密方法好像也没啥作用，因为通过压缩包查看的方法可以识别密码或者删除vbaproject.bin.
那么除了使用以上方法，还有哪些方法可以查看密码？还有哪些加密方法更加难破些？

zhumin1025

上面的123就是密码

ytmpgght

zhumin1025 发表于 2024-1-4 16:16
上面的123就是密码

是的，我的意思是打开工作薄时，如果我们没有密码，那么如何破解