能力值：
( LV2，RANK：10 )
|
-
-
26 楼
Thanks Very Nice.......
|
能力值：
( LV2，RANK：10 )
|
-
-
27 楼
下了顶顶。。
|
能力值：
( LV2，RANK：10 )
|
-
-
28 楼
这个玩意和VB REZQ区别很大么，新版载来试试
|
能力值：
( LV2，RANK：10 )
|
-
-
29 楼
好东西，收藏了
|
能力值：
( LV2，RANK：10 )
|
-
-
30 楼
FFF,WZT,CORE.
确实下了很多好东西都是这个3个组织的。
|
能力值：
( LV2，RANK：10 )
|
-
-
31 楼
都是大牛来的呢
|
能力值：
( LV2，RANK：10 )
|
-
-
32 楼
没用，一反编译就死机！
|
能力值：
( LV2，RANK：10 )
|
-
-
33 楼
2011年1月30日我用99美元购买vb，2月2日作者以不能处理为名将美元退给了我！！不知何故？
|
能力值：
( LV2，RANK：10 )
|
-
-
34 楼
我也遇到过这种情况
|
能力值：
( LV2，RANK：10 )
|
-
-
35 楼
这个我用过也有假死现象，真的要用英文版本？
|
能力值：
( LV2，RANK：10 )
|
-
-
36 楼
正好要破一个VB程序，试了几个都不行，看看这个！
|
能力值：
( LV2，RANK：10 )
|
-
-
37 楼
好久没来了。学习。哈哈
|
能力值：
( LV2，RANK：10 )
|
-
-
38 楼
可以反编译：
Private sub Proc_5_22_44EB60
'Data Table: 40D0C8
Dim var_88 As TextBox
loc_44EAE4: On Error Goto loc_44EB28
loc_44EAF4: Me.ddeText2.Linkclienttopic = "WinFIOL|Channel #3"
loc_44EB09: Me.ddeText2.Linkclientitem = "Event"
loc_44EB1D: Me.ddeText2.Linkclientmode = 1
loc_44EB25: GoTo loc_44EB5E
loc_44EB28: ' Referenced from: 44EAE4
loc_44EB30: Set var_88 = Err
If (Err.Number = &H11D) Then
loc_44EB56: Me.ddeText2.Linkclientmode = 1
loc_44EB5E: ' Referenced from: 44EB25
End If
loc_44EB5E: Exit Sub
End Sub
Private sub Proc_5_21_45AB0C
'Data Table: 40D0C8
Dim var_88 As TextBox
Dim Me.global_68 As Integer
loc_45A88C: On Error Goto loc_45AA4B
loc_45A89C: Me.ddeText1.Linkclienttopic = "WinFIOL|Main"
loc_45A8B0: Me.ddeText1.Linkclientmode = 2
loc_45A8C5: Me.ddeText1.Linkclientitem = "ActiveChannel"
loc_45A8D7: Me.ddeText1.Linkrequest
loc_45A8EB: Me.ddeText1.Linkclientmode = 0
loc_45A919: Me.ddeText1.Linkclienttopic = "WinFIOL|" & Me.ddeText1.Text
loc_45A952: Me.ddeText2.Linkclienttopic = "WinFIOL|" & Me.ddeText1.Text
loc_45A98B: Me.ddeText3.Linkclienttopic = "WinFIOL|" & Me.ddeText1.Text
loc_45A9AA: Me.ddeText1.Linkclientmode = 2
loc_45A9BF: Me.ddeText1.Linkclientitem = "ClientName"
loc_45A9D4: Me.ddeText1.Text = "PeterConv"
loc_45A9E6: Me.ddeText1.Linkpoke
loc_45A9FB: Me.ddeText2.Linkclientitem = "Event"
loc_45AA0F: Me.ddeText2.Linkclientmode = 1
loc_45AA24: Me.ddeText3.Linkclientitem = "Output"
loc_45AA38: Me.ddeText3.Linkclientmode = 1
loc_45AA45: Me.global_68 = 0
loc_45AA48: GoTo loc_45AB0B
loc_45AA4B: ' Referenced from: 45A88C
loc_45AA53: Set var_88 = Err
If (Err.Number = &H11A) Then
loc_45AA86: MsgBox "WINFIOL is not RUNNING yet, please start it first", 0, var_D8, var_F8, var_118
loc_45AA9B: Me.global_68 = &HFF
loc_45AA9E: GoTo loc_45AB0B
End If
loc_45AAA9: Set var_88 = Err
If (Err.Number = &H11D) Then
loc_45AACF: Me.ddeText2.Linkclientmode = 1
loc_45AAD7: GoTo loc_45AB0B
End If
loc_45AAF3: MsgBox "Something wrong when communicating with WINFIOL", 0, var_D8, var_F8, var_118
loc_45AB08: Me.global_68 = &HFF
loc_45AB0B: ' Referenced from: 45AA48
loc_45AB0B: ' Referenced from: 45AA9E
loc_45AB0B: ' Referenced from: 45AAD7
loc_45AB0B: Exit Sub
End Sub
|
能力值：
( LV4，RANK：50 )
|
-
-
39 楼
破解了可是不能用了，正经的vb6程序不能反编译
|
能力值：
( LV2，RANK：10 )
|
-
-
40 楼
不错，感谢分享啊！下载去~
|
|
|
|
