手头有一个程序（无壳）：
1.编写语言：VB6 native code
2.注册过程：注册窗口显示“输入注册码后关闭程序重新启动”，注册按钮灰色，输入12位数字（只可以输入0、1、2、3数字）后注册按钮点亮，点击注册按钮，关闭注册窗口，关闭程序。重启程序，选取某些功能时，提示未注册。
3.od载入，f9运行，左下角提示“不精确的浮点结果”
vbde载入，frmRegister如下：
'offset: 0002BE29
VERSION 5.00
Begin VB.Form frmRegister
   Caption         =   "软件注册"
   LinkTopic       =   "Form1"
   ClientLeft      =   48
   ClientTop       =   300
   ClientWidth     =   6564
   ClientHeight    =   2376
   StartUpsituation =   2  'CenterScreen
'offset: 0002C1FB
   Begin VB.Frame Frame2
      Left            =   0
      Top             =   1320
      Width           =   6570
      Height          =   972
      TabIndex        =   5
'offset: 0002C218
   Begin VB.Label lblHelp1
      Caption         =   "2.输入注册码，点击“注册”按钮，退出软件,再进入即完成注册。"
      ForeColor       =   &H00404040&
      Left            =   120
      Top             =   600
      Width           =   5364
      Height          =   252
      TabIndex        =   7
   End
'offset: 0002C27B
   Begin VB.Label lblHelp2
      Caption         =   "1.获取注册码：010-62368120 lwl@totobook.net  QQ:2240466"
      ForeColor       =   &H00404040&
      Left            =   120
      Top             =   240
      Width           =   5364
      Height          =   252
      MousePointer    =   99
      TabIndex        =   6
   End
   End
'offset: 0002C5E8
   Begin VB.Frame Frame1
      Left            =   0
      Top             =   0
      Width           =   6570
      Height          =   1212
      TabIndex        =   1
'offset: 0002C605
   Begin VB.PictureBox picLogo
   End
'offset: 0002C898
   Begin VB.CommandButton cmdReg
      Caption         =   "注册"
      Left            =   5505
      Top             =   710
      Width           =   852
      Height          =   288
      Enabled         =   0   'False
      TabIndex        =   9
   End
'offset: 0002C8BF
   Begin VB.CommandButton cmdCopy
      Caption         =   "复制"
      Left            =   5505
      Top             =   240
      Width           =   852
      Height          =   288
      TabIndex        =   8
   End
'offset: 0002C8E5
   Begin VB.textBox TextCode
      Left            =   1665
      Top             =   720
      Width           =   3600
      Height          =   264
      TabIndex        =   0
   End
'offset: 0002C904
   Begin VB.Image Image1
   End
'offset: 0002E8F6
   Begin VB.Label lblID
      Caption         =   "3-3-3-3-3-3-3-3-3-3-3-3-31-3"
      BackColor       =   &H00E0E0E0&
      Left            =   1665
      Top             =   255
      Width           =   3600
      Height          =   240
      TabIndex        =   4
      Alignment       =   2
   End
'offset: 0002E939
   Begin VB.Label Label1
      Caption         =   "注册码："
      Left            =   915
      Top             =   765
      Width           =   855
      Height          =   255
      TabIndex        =   3
   End
'offset: 0002E962
   Begin VB.Label Label2
      Caption         =   "机器码："
      Left            =   915
      Top             =   270
      Width           =   735
      Height          =   255
      TabIndex        =   2
   End
   End
End
请大虾指点，下一步该如何操作（爆破），谢谢！

[培训]《安卓高级研修班(网课)》月薪三万计划，掌 握调试、分析还原ollvm、vmp的方法，定制art虚拟机自动化脱壳的方法