最近为破解这个程序而努力着，希望有能力的大大们能帮下忙…

Private Sub cmdOk_Click() '4EB4D0
  loc_004EB4F5: var_8 = &H403300
  loc_004EB5BC: var_64 = txtSNLocal.Text
  loc_004EB5CE: var_7C = @Trim(8)
  loc_004EB5D7: var_C4 = &H4145B4
  loc_004EB5E1: var_CC = &H8008
  loc_004EB605: var_48 = txtMID.Text
  loc_004EB632: neg eax
  loc_004EB634: sbb eax, eax
  loc_004EB63C: eax = (var_48 = 004145B4h) + 1
  loc_004EB643: neg eax
  loc_004EB647: var_D4 = (var_48 = 004145B4h) + 1
  loc_004EB658: var_9C = @Trim(11)
  loc_004EB670: call MSVBVM60.DLL.__vbaVarCmpEq("", ""C, var_7C, "", var_7C, arg_8, "", arg_8, arg_8)
  loc_004EB685: call Or("", var_9C, MSVBVM60.DLL.__vbaVarCmpEq("", ""C, var_7C, "", var_7C, arg_8, "", arg_8, arg_8))
  loc_004EB68C: call MSVBVM60.DLL.__vbaBoolVarNull(Or("", var_9C, MSVBVM60.DLL.__vbaVarCmpEq("", ""C, var_7C, "", var_7C, arg_8, "", arg_8, arg_8)))
                If MSVBVM60.DLL.__vbaBoolVarNull(Or("", var_9C, MSVBVM60.DLL.__vbaVarCmpEq("", ""C, var_7C, "", var_7C, arg_8, "", arg_8, arg_8))) <> esi Then
  loc_004EB6E3:   Proc_00509E40(var_7C, "", "")
  loc_004EB6F3:   var_48 = Proc_00509E40(var_7C, "", "")
  loc_004EB704:   Proc_004849F0("", edx, ecx)
  loc_004EB735:   call txtSNLocal.Setfocus("", "", arg_8, 00000010h, "", esi, 00000001h)
  loc_004EB75C:   GoTo loc_004ECB6A
                End If
  loc_004EB7A2: var_64 = txtSNLocal.Text
  loc_004EB7AD: var_6C = 8
  loc_004EB7E9: var_4C = Replace(@CStr(@Trim(var_6C)), 00414CE8h, 004145B4h, 00000001h, FFFFFFFFh, esi)
  loc_004EB800: setnz cl
  loc_004EB807: neg ecx
  loc_004EB82B: var_7C = var_6C
                If word ptr "" <> 0 Then
  loc_004EB83C:   Proc_00509E40(var_7C, edx, ecx)
  loc_004EB846:   var_48 = Proc_00509E40(var_7C, edx, ecx)
  loc_004EB85C:   Proc_004849F0(0, edx, ecx)
  loc_004EB88C:   call txtSNLocal.Setfocus("", arg_8, arg_8, 00000010h, "", 00000000h, 00000001h, 00000002h)
                  If txtSNLocal.Setfocus("", arg_8, arg_8, 00000010h, "", 00000000h, 00000001h, 00000002h) < 0 Then
  loc_004EB89C:     GoTo loc_004EBAFD
                  End If
  loc_004EB8BF:   var_100 = ""
  loc_004EB8EF:   var_64 = txtActiveCode.Text
  loc_004EB8F7:   var_44 = 0
  loc_004EB905:   var_7C = @Trim(8)
  loc_004EB916:   var_C4 = &H4145B4
  loc_004EB920:   var_CC = &H8008
  loc_004EB92A:   call MSVBVM60.DLL.__vbaVarTstEq(""C, var_7C, "", arg_8, arg_8)
  loc_004EB94A:   var_6C = ""C
                  If word ptr MSVBVM60.DLL.__vbaVarTstEq(""C, var_7C, "", arg_8, arg_8) <> 0 Then
  loc_004EB95B:     Proc_00509E40(var_6C, edx, ecx)
  loc_004EB965:     var_48 = Proc_00509E40(var_6C, edx, ecx)
  loc_004EB97B:     Proc_004849F0(0, edx, ecx)
  loc_004EB9AB:     call txtActiveCode.Setfocus("", arg_8, arg_8, 00000010h, "", 00000000h, 00000002h, 00000002h)
                    If txtActiveCode.Setfocus("", arg_8, arg_8, 00000010h, "", 00000000h, 00000002h, 00000002h) < 0 Then
  loc_004EB9BB:       GoTo loc_004EBAFD
                    End If
  loc_004EBA0E:     var_64 = txtActiveCode.Text
  loc_004EBA16:     var_44 = 0
  loc_004EBA1D:     var_6C = 8
  loc_004EBA54:     var_4C = Replace(@CStr(@Trim(var_6C)), 00414CE8h, 004145B4h, 00000001h, FFFFFFFFh, 00000000h)
  loc_004EBA68:     setnz cl
  loc_004EBA6D:     neg ecx
  loc_004EBA90:     var_7C = var_6C
  loc_004EBA9D:     GoTo loc_004EBA1D
  loc_004EBAA1:     Proc_00509E40(var_7C, edx, ecx)
  loc_004EBAAB:     var_48 = Proc_00509E40(var_7C, edx, ecx)
  loc_004EBAC1:     Proc_004849F0(0, edx, ecx)
  loc_004EBAF1:     call txtActiveCode.Setfocus("", arg_8, arg_8, 00000010h, "", 00000000h, 00000002h, 00000002h)
                    If txtActiveCode.Setfocus("", arg_8, arg_8, 00000010h, "", 00000000h, 00000002h, 00000002h) < 0 Then
  loc_004EBAFD:       'Referenced from 004EB89C
  loc_004EBB09:       CheckObj(txtActiveCode.Setfocus("", arg_8, arg_8, 00000010h, "", 00000000h, 00000002h, 00000002h), "", 00415490h, 00000204h)
                    End If
                  End If
                End If
  loc_004EBB18: GoTo loc_004ECB68
  loc_004EBB3B: var_100 = ""
  loc_004EBB6B: var_64 = txtMID.Text
  loc_004EBB73: var_44 = 0
  loc_004EBB81: var_7C = @Trim(8)
  loc_004EBBB1: var_4C = Replace(@CStr(var_7C), 00414CE8h, 004145B4h, 00000001h, FFFFFFFFh, 00000000h)
  loc_004EBBB4: Proc_005016E0(var_4C, edx, ecx)
  loc_004EBBC5: var_84 = Proc_005016E0(var_4C, edx, ecx)
  loc_004EBBD9: var_50 = 0
  loc_004EBBEA: var_9C = @Right(8, 00000008h)
  loc_004EBBF7: call MSVBVM60.DLL.__vbaStrVarMove(var_9C, var_4C, "", arg_8, arg_8, arg_8, arg_8, arg_8, arg_8)
  loc_004EBC38: var_8C = var_7C
  loc_004EBC8B: var_64 = txtSNLocal.Text
  loc_004EBC93: var_44 = 0
  loc_004EBCA1: var_7C = @Trim(8)
  loc_004EBD07: var_44 = Replace(@CStr(var_7C), 00414CE8h, 004145B4h, 00000001h, FFFFFFFFh, 00000000h) & MSVBVM60.DLL.__vbaStrVarMove(var_9C, var_4C, "", arg_8, arg_8, arg_8, arg_8, arg_8, arg_8)
  loc_004EBD0D: Proc_004EF6E0(var_44, edx, var_44)
  loc_004EBD25: var_4C = StrReverse(Proc_004EF6E0(var_44, edx, var_44), var_44, 00000002h, edx, var_7C, "", arg_8, arg_8, arg_8)
  loc_004EBD28: Proc_004F17B0(var_4C, edx, ecx)
  loc_004EBD32: var_50 = Proc_004F17B0(var_4C, edx, ecx)
  loc_004EBD35: Proc_004ED4A0(var_50, edx, ecx)
  loc_004EBD4D: var_20 = StrReverse(Proc_004ED4A0(var_50, edx, ecx), var_50, var_4C)
  loc_004EBDB8: var_64 = txtActiveCode.Text
  loc_004EBDC0: var_44 = 0
  loc_004EBDCE: var_7C = @Trim(8)
  loc_004EBDD8: call MSVBVM60.DLL.__vbaStrVarMove(var_7C, "", arg_8, arg_8)
  loc_004EBDE3: var_1C = MSVBVM60.DLL.__vbaStrVarMove(var_7C, "", arg_8, arg_8)
  loc_004EBDF8: ecx = var_7C
  loc_004EBE0B: var_C4 = var_1C
  loc_004EBE4B: var_48 = Replace(@CStr(@Trim(""C)), 00414CE8h, 004145B4h, 00000001h, FFFFFFFFh, 00000000h)
  loc_004EBE4E: Proc_005016E0(var_48, edx, ecx)
  loc_004EBE58: var_24 = Proc_005016E0(var_48, edx, ecx)
  loc_004EBE78: var_C4 = var_24
  loc_004EBE8C: var_64 = 1
  loc_004EBE93: var_6C = 2
  loc_004EBEA4: var_7C = @Mid$(""C, 00000001h, var_6C)
  loc_004EBEB2: var_44 = @CStr(var_7C)
  loc_004EBEB9: call MSVBVM60.DLL.rtcCharValueBstr(var_44, "", 00000002h, var_6C, var_6C, var_6C, var_6C, var_6C, var_6C)
  loc_004EBEBF: movsx edx, ax
  loc_004EBEC3: Proc_00500C20(MSVBVM60.DLL.rtcCharValueBstr(var_44, "", 00000002h, var_6C, var_6C, var_6C, var_6C, var_6C, var_6C), var_7C, var_44)
  loc_004EBECD: var_4C = Proc_00500C20(MSVBVM60.DLL.rtcCharValueBstr(var_44, "", 00000002h, var_6C, var_6C, var_6C, var_6C, var_6C, var_6C), var_7C, var_44)
  loc_004EBEE0: var_48 = 0
  loc_004EBEEA: Proc_00500E40(var_8C, edx, ecx)
  loc_004EBEF6: call MSVBVM60.DLL.__vbaStrVarMove(var_8C, var_8C, var_48, 00000008h, 00000000h, var_7C)
  loc_004EBF01: var_38 = MSVBVM60.DLL.__vbaStrVarMove(var_8C, var_8C, var_48, 00000008h, 00000000h, var_7C)
  loc_004EBF31: call MSVBVM60.DLL.__vbaStrCopy(00000003h, var_8C, var_7C, var_8C)
  loc_004EBF3F: call MSVBVM60.DLL.__vbaStrCopy
  loc_004EBF51: call MSVBVM60.DLL.__vbaI2I4
  loc_004EBF6D: [edi] = [edi] + Len(var_38)
  loc_004EBF75: ebp = esp - 1
  loc_004EBF76: enter 558Dh, 94h
  loc_004EBF7A: movsx eax, ax
  loc_004EBF7D: var_C4 = Len(var_38)
  loc_004EBF90: var_64 = 1
  loc_004EBFA8: var_7C = @Mid$(""C, 0001h, var_38)
  loc_004EBFB2: call MSVBVM60.DLL.__vbaStrVarMove(var_7C, 0001h)
  loc_004EBFC9: var_7C = 2
  loc_004EBFDF: var_64 = 1
  loc_004EBFE6: var_6C = 2
                If (MSVBVM60.DLL.__vbaStrVarMove(var_7C, 0001h) = 00414D90h) = 0 Then
  loc_004EBFF8:   arg_566DC4D = arg_566DC4D + cl
  loc_004EBFFE:   C084h = C084h + eax
                  If Err.Number <> 0 Then GoTo loc_004ECC2D
  loc_004EC019:   movsx ecx, ax
  loc_004EC029:   var_7C = @Mid$(""C, ecx, var_6C)
  loc_004EC037:   var_44 = @CStr(var_7C)
  loc_004EC03E:   call MSVBVM60.DLL.rtcCharValueBstr(var_44, C084h, 00000002h, var_6C, var_7C)
  loc_004EC044:   var_84 = MSVBVM60.DLL.rtcCharValueBstr(var_44, C084h, 00000002h, var_6C, var_7C)
  loc_004EC059:   var_8C = 2
  loc_004EC063:   var_9C = @Hex(var_8C)
  loc_004EC077:   var_F4 = ""
  loc_004EC07D:   var_FC = 8
  loc_004EC087:   call MSVBVM60.DLL.__vbaStrErrVarCopy(var_9C, 00000002h, 00000000h)
  loc_004EC092:   var_48 = MSVBVM60.DLL.__vbaStrErrVarCopy(var_9C, 00000002h, 00000000h)
  loc_004EC09C:   Proc_00500E40(var_48, edx, "")
  loc_004EC0B6:   call MSVBVM60.DLL.__vbaVarCat("", "", var_FC, "", var_48)
  loc_004EC0BD:   call MSVBVM60.DLL.__vbaStrVarMove(MSVBVM60.DLL.__vbaVarCat("", "", var_FC, "", var_48))
  loc_004EC0C8:   var_2C = MSVBVM60.DLL.__vbaStrVarMove(MSVBVM60.DLL.__vbaVarCat("", "", var_FC, "", var_48))
  loc_004EC0D4:   call edi]+Len(var_38(00000002h, var_44, var_48)
  loc_004EC101:   GoTo loc_004EC215
                End If
  loc_004EC110: 0050C084h = 0050C084h + 0002h
  loc_004EC114: var_C4 = var_24
                If Err.Number <> 0 Then GoTo loc_004ECC2D
  loc_004EC12D: movsx edx, cx
  loc_004EC13D: var_7C = @Mid$(""C, var_24, var_6C)
  loc_004EC14B: var_44 = @CStr(var_7C)
  loc_004EC152: call MSVBVM60.DLL.rtcCharValueBstr(var_44, var_7C, var_8C, var_9C, var_9C, "", "", "", "")
  loc_004EC166: var_84 = MSVBVM60.DLL.rtcCharValueBstr(var_44, var_7C, var_8C, var_9C, var_9C, "", "", "", "")
  loc_004EC177: var_9C = @Hex(2)
  loc_004EC18B: var_F4 = ""
  loc_004EC191: var_FC = 8
  loc_004EC19B: call MSVBVM60.DLL.__vbaStrErrVarCopy(var_9C, 00000002h, 00000000h)
  loc_004EC1A6: var_48 = MSVBVM60.DLL.__vbaStrErrVarCopy(var_9C, 00000002h, 00000000h)
  loc_004EC1B0: Proc_00500E40(var_48, "", ecx)
  loc_004EC1CA: call MSVBVM60.DLL.__vbaVarCat("", "", var_FC, "", var_48)
  loc_004EC1D1: call MSVBVM60.DLL.__vbaStrVarMove(MSVBVM60.DLL.__vbaVarCat("", "", var_FC, "", var_48))
  loc_004EC1DC: var_28 = MSVBVM60.DLL.__vbaStrVarMove(MSVBVM60.DLL.__vbaVarCat("", "", var_FC, "", var_48))
  loc_004EC1E8: call edi]+Len(var_38(00000002h, var_44, var_48)
  loc_004EC215: 'Referenced from 004EC101
  loc_004EC217: var_7C = var_6C
  loc_004EC221: 00000001h = 00000001h + 0050C084h
                If Err.Number <> 0 Then GoTo loc_004ECC2D
  loc_004EC22E: GoTo loc_004EBF61
                If (var_20 = var_2C) = 0 Then
  loc_004EC26E:   var_100 = 50DCCCh
  loc_004EC29C:   var_108 = ""
  loc_004EC2A2:   var_44 = frmReg.Caption
  loc_004EC2DE:   var_110 = ""
  loc_004EC30E:   var_64 = txtSNLocal.Text
  loc_004EC316:   var_48 = 0
  loc_004EC324:   var_7C = @Trim(8)
  loc_004EC332:   call MSVBVM60.DLL.__vbaStrCopy("", arg_8, arg_8, "", 00000007h, 00000007h, 00000007h, 00000007h, 00000007h)
  loc_004EC340:   call MSVBVM60.DLL.__vbaStrCopy
  loc_004EC36E:   Proc_0048CA20(var_50, edx, "")
  loc_004EC378:   var_18 = Proc_0048CA20(var_50, edx, "")
  loc_004EC38C:   call edi]+Len(var_38(00000004h, var_44, "", var_50, var_44 & 0041863Ch, "", 00413F2Ch, var_50, var_44 & 0041863Ch)
  loc_004EC3A8:   var_58 = var_7C
  loc_004EC3D2:   var_100 = 50DCCCh
  loc_004EC400:   var_108 = var_58
  loc_004EC406:   var_44 = frmReg.Caption
  loc_004EC432:   var_C4 = var_1C
  loc_004EC450:   call MSVBVM60.DLL.__vbaStrCopy(var_58, 00000002h, @Trim(""C), var_7C)
  loc_004EC45E:   call MSVBVM60.DLL.__vbaStrCopy
  loc_004EC48C:   Proc_0048CA20(var_48, "", ecx)
  loc_004EC496:   var_18 = Proc_0048CA20(var_48, "", ecx)
  loc_004EC4AA:   call edi]+Len(var_38(00000004h, var_44, var_48, "", var_44 & 0041863Ch, var_48, 00413F2Ch, "", var_44 & 0041863Ch)
  loc_004EC4D4:   Proc_004EA4D0("", var_1C, ecx)
                  If Proc_004EA4D0("", var_1C, ecx) = 65535 Then
  loc_004EC4F6:     Proc_004EA4D0(var_1C, edx, ecx)
                    If Proc_004EA4D0(var_1C, edx, ecx) = 65535 Then
  loc_004EC553:       var_64 = txtSNLocal.Text
  loc_004EC55B:       var_44 = 0
  loc_004EC562:       var_6C = 8
  loc_004EC569:       var_7C = @Trim(var_6C)
  loc_004EC58D:       Proc_004EA4D0(@CStr(var_7C), @CStr(var_7C), var_7C)
  loc_004EC598:       setz cl
  loc_004EC59B:       neg ecx
  loc_004EC5C0:       ecx = var_7C
                      If word ptr "" <> 0 Then
  loc_004EC5FB:         var_100 = 50DCCCh
  loc_004EC601:         call MSVBVM60.DLL.__vbaObjSetAddref("", arg_8, 00000002h, var_6C, var_7C, 0041AE4Ch, 0041B1A4h, 0041B1ECh, "")
  loc_004EC607:         var_174 = MSVBVM60.DLL.__vbaObjSetAddref("", arg_8, 00000002h, var_6C, var_7C, 0041AE4Ch, 0041B1A4h, 0041B1ECh, "")
  loc_004EC61B:         call frmReg.GetTypeInfo(MSVBVM60.DLL.__vbaObjSetAddref("", arg_8, 00000002h, var_6C, var_7C, 0041AE4Ch, 0041B1A4h, 0041B1ECh, ""))
  loc_004EC64C:         var_D4 = &H4195B8
  loc_004EC656:         var_DC = 8
  loc_004EC660:         var_C4 = var_28
  loc_004EC670:         var_6C = @Left(""C, 00000002h)
  loc_004EC685:         call MSVBVM60.DLL.__vbaVarCat(var_7C, var_6C, var_DC)
  loc_004EC68C:         MSVBVM60.DLL.__vbaVarCat(var_7C, var_6C, var_DC) = @CLng(%x2)
  loc_004EC693:         Proc_00500C20(MSVBVM60.DLL.__vbaVarCat(var_7C, var_6C, var_DC), var_6C, var_DC)
  loc_004EC69D:         var_44 = Proc_00500C20(MSVBVM60.DLL.__vbaVarCat(var_7C, var_6C, var_DC), var_6C, var_DC)
  loc_004EC6A0:         Proc_00500CE0(var_44, edx, ecx)
  loc_004EC6AC:         call MSVBVM60.DLL.__vbaStrI2(Proc_00500CE0(var_44, edx, ecx), var_44, MSVBVM60.DLL.__vbaVarCat(var_7C, var_6C, var_DC))
  loc_004EC6B3:         var_48 = MSVBVM60.DLL.__vbaStrI2(Proc_00500CE0(var_44, edx, ecx), var_44, MSVBVM60.DLL.__vbaVarCat(var_7C, var_6C, var_DC))
  loc_004EC6B6:         Proc_00501020(var_48, edx, ecx)
  loc_004EC6C6:         var_84 = Proc_00501020(var_48, edx, ecx)
  loc_004EC6CC:         var_8C = 8
  loc_004EC6D6:         call MSVBVM60.DLL.__vbaVarMove(var_48)
  loc_004EC6E6:         call edi]+Len(var_38(00000002h, var_44, var_48)
  loc_004EC70B:         var_C4 = var_28
  loc_004EC72B:         var_D4 = &H4195B8
  loc_004EC735:         var_DC = 8
  loc_004EC73F:         var_7C = @Right(@Left(""C, 00000004h), 00000002h)
  loc_004EC757:         call MSVBVM60.DLL.__vbaVarCat(var_8C, var_7C, var_DC)
  loc_004EC75E:         MSVBVM60.DLL.__vbaVarCat(var_8C, var_7C, var_DC) = @CLng(%x2)
  loc_004EC765:         Proc_00500C20(MSVBVM60.DLL.__vbaVarCat(var_8C, var_7C, var_DC), var_7C, var_DC)
  loc_004EC76F:         var_44 = Proc_00500C20(MSVBVM60.DLL.__vbaVarCat(var_8C, var_7C, var_DC), var_7C, var_DC)
  loc_004EC772:         Proc_00500CE0(var_44, edx, ecx)
  loc_004EC778:         call MSVBVM60.DLL.__vbaStrI2(Proc_00500CE0(var_44, edx, ecx), var_44, MSVBVM60.DLL.__vbaVarCat(var_8C, var_7C, var_DC))
  loc_004EC77F:         var_48 = MSVBVM60.DLL.__vbaStrI2(Proc_00500CE0(var_44, edx, ecx), var_44, MSVBVM60.DLL.__vbaVarCat(var_8C, var_7C, var_DC))
  loc_004EC782:         Proc_00501020(var_48, edx, ecx)
  loc_004EC78E:         ecx = Proc_00501020(var_48, edx, ecx)
  loc_004EC79A:         call edi]+Len(var_38(00000002h, var_44, var_48, var_48)
  loc_004EC7BC:         var_C4 = var_24
  loc_004EC7D0:         var_64 = 1
  loc_004EC7F6:         var_44 = @CStr(@Mid$(""C, 00000002h, 2))
  loc_004EC7FD:         call MSVBVM60.DLL.rtcCharValueBstr(var_44)
  loc_004EC804:         call MSVBVM60.DLL.__vbaStrI2(MSVBVM60.DLL.rtcCharValueBstr(var_44))
  loc_004EC80B:         var_48 = MSVBVM60.DLL.__vbaStrI2(MSVBVM60.DLL.rtcCharValueBstr(var_44))
  loc_004EC80E:         Proc_00501020(var_48, edx, ecx)
  loc_004EC81A:         ecx = Proc_00501020(var_48, edx, ecx)
  loc_004EC826:         call edi]+Len(var_38(00000002h, var_44, var_48, var_48)
  loc_004EC885:         var_44 = frmReg.Caption
  loc_004EC8AB:         var_64 = 80020004h
  loc_004EC8B9:         call MSVBVM60.DLL.__vbaStrCopy("")
  loc_004EC8C3:         call MSVBVM60.DLL.__vbaStrCopy
  loc_004EC8DD:         var_50 = var_44 & 0041863Ch
  loc_004EC8ED:         Proc_0048CA20(var_48, "", ecx)
  loc_004EC8FD:         var_74 = Proc_0048CA20(var_48, "", ecx)
  loc_004EC91B:         var_D4 = &H414D90
  loc_004EC92F:         call MSVBVM60.DLL.__vbaVarTstEq(&H8008, @Trim(8), var_48, 00413F2Ch, "", var_50, 10)
  loc_004EC949:         call edi]+Len(var_38(00000004h, var_44, var_48, "", var_50)
  loc_004EC99D:         var_DC = 10
  loc_004EC9A3:         var_CC = 10
  loc_004EC9B6:         var_D4 = 80020004h
  loc_004EC9D5:         var_C4 = 80020004h
  loc_004EC9FE:         frmReg.Show %x1, %x2
                        If frmReg.Show %x1, %x2 < 0 Then
  loc_004ECA1A:           CheckObj(frmReg.Show %x1, 0050C010h, %x2, 00413730h, 000002B0h)
  loc_004ECA20:           GoTo loc_004ECB68
  loc_004ECA48:           var_DC = 10
  loc_004ECA4E:           var_CC = 10
  loc_004ECA61:           var_D4 = 80020004h
  loc_004ECA80:           var_C4 = 80020004h
  loc_004ECAA9:           frmReg.Show %x1, %x2
                          If frmReg.Show %x1, %x2 < 0 Then
  loc_004ECAC5:             CheckObj(frmReg.Show %x1, 0050C4A4h, %x2, 0041A34Ch, 000002B0h)
  loc_004ECACB:             GoTo loc_004ECB68
                          End If
  loc_004ECAD2:           Proc_00509E40(CheckObj(frmReg.Show %x1, 0050C4A4h, %x2, 0041A34Ch, 000002B0h), ""0, ""C)
  loc_004ECADC:           call (00000003h)
  loc_004ECAE6:           var_48 = 0
  loc_004ECAED:           call (00000000h)
  loc_004ECAF2:           Proc_004849F0((00000000h), var_48, var_44)
  loc_004ECAFF:           GoTo loc_004ECB61
                        End If
  loc_004ECB03:         Proc_00509E40(var_44, var_48, ecx)
  loc_004ECB0D:         call (00000003h, var_48, 00000010h, (00000000h))
  loc_004ECB17:         var_48 = 0
  loc_004ECB1E:         call (00000000h)
  loc_004ECB23:         Proc_004849F0((00000000h), var_48, var_44)
  loc_004ECB30:         GoTo loc_004ECB61
                      End If
                    End If
  loc_004ECB34:     Proc_00509E40(Proc_004849F0((00000000h), var_48, var_44), var_44, var_48)
  loc_004ECB3E:     call (00000003h, var_48, 00000010h, (00000000h))
  loc_004ECB48:     var_48 = 0
  loc_004ECB4F:     call (00000000h)
  loc_004ECB54:     Proc_004849F0((00000000h), var_48, var_44)
  loc_004ECB61:     'Referenced from 004ECAFF
  loc_004ECB63:     call esi(00000002h, var_44, var_48, 00000010h, (00000000h))
                  End If
                End If
  loc_004ECB6A: 'Referenced from 004EB75C
  loc_004ECB72: GoTo loc_004ECBD0
  loc_004ECBCF: Exit Sub
  loc_004ECBD0: 'Referenced from 004ECB72
  loc_004ECC0D: Exit Sub
  loc_004ECC2A: Exit Sub
  loc_004ECC2D: 'Referenced from 04EC006
  loc_004ECC2D: call MSVBVM60.DLL.__vbaErrorOverflow
End Sub

[注意]传递专业知识、拓宽行业人脉——看雪讲师团队等你加入！