朋友看一下!!!

sugar8a

VB编译，功能限制！！请问如何修改？

004D9540    55            push ebp-----------按钮执行代码
004D9541    8BEC          mov ebp,esp
004D9543    83EC 0C       sub esp,0C
004D9546    68 96364000   push <jmp.&msvbvm60.__vbaExceptHandler>
004D954B    64:A1 0000000>mov eax,dword ptr fs:[0]
004D9551    50            push eax
004D9552    64:8925 00000>mov dword ptr fs:[0],esp
004D9559    81EC 88000000 sub esp,88
004D955F    53            push ebx
004D9560    56            push esi
004D9561    57            push edi
004D9562    8965 F4       mov dword ptr ss:[ebp-C],esp
004D9565    C745 F8 28214>mov dword ptr ss:[ebp-8],福彩.00402128
004D956C    8B45 08       mov eax,dword ptr ss:[ebp+8]
004D956F    8BC8          mov ecx,eax
004D9571    83E1 01       and ecx,1
004D9574    894D FC       mov dword ptr ss:[ebp-4],ecx
004D9577    24 FE         and al,0FE
004D9579    50            push eax
004D957A    8945 08       mov dword ptr ss:[ebp+8],eax
004D957D    8B10          mov edx,dword ptr ds:[eax]
004D957F    FF52 04       call dword ptr ds:[edx+4]
004D9582    B9 04000280   mov ecx,80020004
004D9587    33F6          xor esi,esi
004D9589    894D B4       mov dword ptr ss:[ebp-4C],ecx
004D958C    B8 0A000000   mov eax,0A
004D9591    894D C4       mov dword ptr ss:[ebp-3C],ecx
004D9594    894D D4       mov dword ptr ss:[ebp-2C],ecx
004D9597    8975 CC       mov dword ptr ss:[ebp-34],esi
004D959A    8975 BC       mov dword ptr ss:[ebp-44],esi
004D959D    8975 AC       mov dword ptr ss:[ebp-54],esi
004D95A0    8975 9C       mov dword ptr ss:[ebp-64],esi
004D95A3    8D55 9C       lea edx,dword ptr ss:[ebp-64]
004D95A6    8D4D DC       lea ecx,dword ptr ss:[ebp-24]
004D95A9    8975 DC       mov dword ptr ss:[ebp-24],esi
004D95AC    8945 AC       mov dword ptr ss:[ebp-54],eax
004D95AF    8945 BC       mov dword ptr ss:[ebp-44],eax
004D95B2    8945 CC       mov dword ptr ss:[ebp-34],eax
004D95B5    C745 A4 2CC04>mov dword ptr ss:[ebp-5C],福彩.0042C02C
004D95BC    C745 9C 08000>mov dword ptr ss:[ebp-64],8
004D95C3    FF15 58124000 call dword ptr ds:[<&msvbvm60.__vbaVarDup>]   ; msvbvm60.__vbaVarDup
004D95C9    8D45 AC       lea eax,dword ptr ss:[ebp-54]
004D95CC    8D4D BC       lea ecx,dword ptr ss:[ebp-44]
004D95CF    50            push eax
004D95D0    8D55 CC       lea edx,dword ptr ss:[ebp-34]
004D95D3    51            push ecx
004D95D4    52            push edx
004D95D5    8D45 DC       lea eax,dword ptr ss:[ebp-24]
004D95D8    56            push esi
004D95D9    50            push eax
004D95DA    FF15 B4104000 call dword ptr ds:[<&msvbvm60.rtcMsgBox>]     ; msvbvm60.rtcMsgBox----------------注册才可用本功能
004D95E0    8D4D AC       lea ecx,dword ptr ss:[ebp-54]
004D95E3    8D55 BC       lea edx,dword ptr ss:[ebp-44]
004D95E6    51            push ecx
004D95E7    8D45 CC       lea eax,dword ptr ss:[ebp-34]
004D95EA    52            push edx
004D95EB    8D4D DC       lea ecx,dword ptr ss:[ebp-24]
004D95EE    50            push eax
004D95EF    51            push ecx
004D95F0    6A 04         push 4
004D95F2    FF15 38104000 call dword ptr ds:[<&msvbvm60.__vbaFreeVarLis>; msvbvm60.__vbaFreeVarList
004D95F8    83C4 14       add esp,14
004D95FB    8975 FC       mov dword ptr ss:[ebp-4],esi
004D95FE    68 22964D00   push 福彩.004D9622
004D9603    EB 1C         jmp short 福彩.004D9621
004D9605    8D55 AC       lea edx,dword ptr ss:[ebp-54]
004D9608    8D45 BC       lea eax,dword ptr ss:[ebp-44]
004D960B    52            push edx
004D960C    8D4D CC       lea ecx,dword ptr ss:[ebp-34]
004D960F    50            push eax
004D9610    8D55 DC       lea edx,dword ptr ss:[ebp-24]
004D9613    51            push ecx
004D9614    52            push edx
004D9615    6A 04         push 4
004D9617    FF15 38104000 call dword ptr ds:[<&msvbvm60.__vbaFreeVarLis>; msvbvm60.__vbaFreeVarList
004D961D    83C4 14       add esp,14

[ 本帖最后由 sugar8a 于 2007-8-27 13:16 编辑 ]

langlirong

没看懂，我太菜啦