EXCEL密码破解无需任何工具插件超简单

    Name=Text1Р17      UpDown      Name=UpDown1,BuddyProperty=Text,Wrap=TRUE,Increment=1Р           BuddyControl=txtPasswordStartLong,Max=15,Min=Р18      UpDown      Name=UpDown2,BuddyProperty=Text,Wrap=TRUE,Increment=1Р           BuddyControl=txtPasswordEndLong,Max=15,Min=1Р19      CommonDialog      Name=Dialog,DialogTitle=请选择加密的Excel或Word文档Р           Filter=Excel(*.xls),Word(*.doc)|*.xls;*.docР20      Label      Name=Label1, Caption=破解进度:Р21      Label      Name=Label3,Caption=从:Р22      Label      Name=Label5,Caption=到:Р⑶为以上对象编写下列代码Р为了便于理解,程序中增加了适当的注释。РOption ExplicitРPrivate Sub CmdBrowse_Click()Р    Dialog.ShowOpen 'show the dialogР    Combo1.Text = Dialog.FileName   'set the Filename text box to the selected fileР    Combo1.RefreshРEnd SubРPrivate Sub CmdQuit_Click()Р    EndРEnd Sub