Rookietp 发表于 2010-3-31 17:09

一个VB的CM,大家都来玩.



我等菜鸟搞不定,,

挺简单,可是我搞不出...

搞出来了的,给点思路.....

vienna 发表于 2010-3-31 17:25

cm有问题。。什么都不太填然后计算就错误退出

fatwolf08 发表于 2010-3-31 19:53

这不是PYG那发的吗,VB的P-CODE编译的
401De7:1C --》1D

wgz001 发表于 2010-4-7 11:05

Private Sub Command1_Click() '401E40
'Data Table: 4017EC
            If (((CVar(Me.Text1.Text) + 2) + 3) = CVar(Val(Me.Text2.Text))) Then
loc_401E03:   MsgBox "高手啊,我服了", 0, var_10C, var_12C, var_14C
loc_401E13:   GoTo loc_401E3F
            End If
loc_401E2F: MsgBox "不会吧,比我还菜,哈哈~", 0, var_10C, var_12C, var_14C
loc_401E3F: ' Referenced from: 401E13
loc_401E3F: Exit Sub
End Sub

用VB Decompiler V7.7 看到的   

另外楼上的几位看看破解说明
页: [1]
查看完整版本: 一个VB的CM,大家都来玩.