modlinkbetweenforms.bas

不使用WinRAR

Attribute VB_Name = "modLinkBetweenForms"
'****************************************************************************
' ：） 人人为我，我为人人 ：）
'枕善居汉化收藏整理
'发布日期：06/06/28
'描    述：VB解压缩RAR文档
'网    站：http://www.mndsoft.com/
'e-mail  ：[e-mail]   最新的邮箱,如果您有新的好的代码别忘记给枕善居哦
'OICQ    ：88382850
'****************************************************************************
Public Password As String ' needed so that encrypted files can be decrypted in one go
Public TotalArchiveSize As Double 'used for progressbar, Total unpacked archive size
Public PasswordStatus As Boolean ' test if theres a password so that user can't change page until one is supplied
Public CorruptFile As Boolean 'is tested when the user tries to select output form
Public StopProcessing As Boolean
Public ArchiveObjects As Long
Public ExtractedObjects As Long
Public Lisx As ListItem
Public Colx As ColumnHeader

Public TopLevelFolder As String
Public NextLevelFolder As String
Public ArchiveComment As String