本程序是2002.4.1号写的，大家应该知道是什么日子吧，原来的想法是可以将程序与TXT关联的，但没时间去修改了。程序跟上次的“辨断你的Windows是正版还是盗版 ”差不多，但这个可以在2K/XP里用的：）

VERSION 5.00
Begin VB.Form frmMain
   BorderStyle     =   3  ''''Fixed Dialog
   Caption         =   "Dr.Watson"
   ClientHeight    =   2190
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   6120
   Icon            =   "frmMain.frx":0000
   LinkTopic       =   "Form1"
   MaxButton       =   0   ''''False
   MinButton       =   0   ''''False
   ScaleHeight     =   2190
   ScaleWidth      =   6120
   ShowInTaskbar   =   0   ''''False
   StartUpPosition =   1  ''''CenterOwner
   Begin VB.Frame Frame
      BorderStyle     =   0  ''''None
      Caption         =   "Frame1"
      Height          =   2175
      Left            =   0
      TabIndex        =   0
      Top             =   0
      Width           =   6135
      Begin VB.Frame Frame2
         BorderStyle     =   0  ''''None
         Caption         =   "Frame2"
         Height          =   1695
         Left            =   4560
         TabIndex        =   11
         Top             =   1680
         Width           =   4575
         Begin VB.Label Label3
            Caption         =   "        注意：如果Dr.Watson检测到输入的序列号错误，将自动返回上一步。"
            Height          =   435
            Left            =   0
            TabIndex        =   14
            Top             =   720
            Width           =   4485
         End
         Begin VB.Label Label2
            AutoSize        =   -1  ''''True
            Caption         =   "正在验证序列号的正确性，请稍后..."
            Height          =   195
            Left            =   720
            TabIndex        =   13
            Top             =   1320
            Width           =   2835
         End
         Begin VB.Label Label1
            Caption         =   "        正在验证序列号是否正确，此过程可能要花数分钟时间，同时可能导致计算机停止响应。"
            Height          =   375
            Left            =   0
            TabIndex        =   12
            Top             =   240
            Width           =   4575
         End
      End
      Begin VB.Frame Frame1
         BorderStyle     =   0  ''''None
         Caption         =   "Frame1"
         Height          =   1935
         Left            =   -2640
         TabIndex        =   2
         Top             =   1200
         Width           =   4695
         Begin VB.TextBox txtBox
            Height          =   375
            Index           =   4
            Left            =   3720
            TabIndex        =   8
            Top             =   1080
            Width           =   615
         End
         Begin VB.TextBox txtBox
            Height          =   375
            Index           =   3
            Left            =   2880
            TabIndex        =   7
            Top             =   1080
            Width           =   615
         End
         Begin VB.TextBox txtBox
            Height          =   375
&nb

[1] [2] [3]  下一页