密码登录之二(VB6.0代码编写) 密码登录之二 Dim Password, Pword Password = "111" '111为进入密码 Pword = InputBox("请输入密码") If Pword Password Then MsgBox "对不起你输入的密码错误。" End End If
表格解密Public Sub AllInternalPasswords() ' Breaks worksheet and workbook structure passwords. Bob McCormick ' probably originator of base code algorithm modified for coverage ' of workbook structure / windows passwords and for multiple passwords ' ' No