module.bas

利用穷解法破解QQ时要用到的字典,可用同一QQ生成相应的不同密码.也可以利用一个弱密码生成不同的QQ段.

Attribute VB_Name = "Module"
Public PWDNo As Integer
Public J As Integer
Public Lb1 As Long
Public Lb2 As Long
Public Lb3 As Long
Public Lb4 As Long
Public Lb5 As Long
Public Lb6 As Long
Public Lb7 As Long
Public Lb8 As Long
Public Lb9 As Long
Public Lb10 As Long
Public Lb11 As Long
Public Lb12 As Long
Public Lb13 As Long
Public Lb14 As Long
Public Lb15 As Long
Public Lb16 As Long
Public Le1 As Long
Public Le2 As Long
Public Le3 As Long
Public Le4 As Long
Public Le5 As Long
Public Le6 As Long
Public Le7 As Long
Public Le8 As Long
Public Le9 As Long
Public Le10 As Long
Public Le11 As Long
Public Le12 As Long
Public Le13 As Long
Public Le14 As Long
Public Le15 As Long
Public Le16 As Long


Public StrB1 As String
Public StrB2 As String
Public StrB3 As String
Public StrB4 As String
Public StrB5 As String
Public StrB6 As String
Public StrB7 As String
Public StrB8 As String
Public StrB9 As String
Public StrB10 As String
Public StrB11 As String
Public StrB12 As String
Public StrB13 As String
Public StrB14 As String
Public StrB15 As String
Public StrB16 As String
Public StrE1 As String
Public StrE2 As String
Public StrE3 As String
Public StrE4 As String
Public StrE5 As String
Public StrE6 As String
Public StrE7 As String
Public StrE8 As String
Public StrE9 As String
Public StrE10 As String
Public StrE11 As String
Public StrE12 As String
Public StrE13 As String
Public StrE14 As String
Public StrE15 As String
Public StrE16 As String

Public Itg1 As Integer
Public Itg2 As Integer
Public Itg3 As Integer
Public Itg4 As Integer
Public Itg5 As Integer
Public Itg6 As Integer
Public Itg7 As Integer
Public Itg8 As Integer
Public Itg9 As Integer
Public Itg10 As Integer
Public Itg11 As Integer
Public Itg12 As Integer
Public Itg13 As Integer
Public Itg14 As Integer
Public Itg15 As Integer
Public Itg16 As Integer

Public Seed As Integer
Public Mode As String
Public LogEn As Boolean

Public Function Clear()
Lb1 = 0
Lb2 = 0
Lb3 = 0
Lb4 = 0
Lb5 = 0
Lb6 = 0
Lb7 = 0
Lb8 = 0
Lb9 = 0
Lb10 = 0
Lb11 = 0
Lb12 = 0
Lb13 = 0
Lb14 = 0
Lb15 = 0
Lb16 = 0
Le1 = 0
Le2 = 0
Le3 = 0
Le4 = 0
Le5 = 0
Le6 = 0
Le7 = 0
Le8 = 0
Le9 = 0
Le10 = 0
Le11 = 0
Le12 = 0
Le13 = 0
Le14 = 0
Le15 = 0
Le16 = 0
End Function