序列号检查程序

本程序是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
Index = 2
Left = 2040
TabIndex = 6
Top = 1080
Width = 615
End
Begin VB.TextBox txtBox
Height = 375
Index = 1
Left = 1200
TabIndex = 5
Top = 1080
Width = 615
End
Begin VB.TextBox txtBox
Height = 375
Index = 0
Left = 360
TabIndex = 4
Top = 1080
Width = 615
End
Begin VB.CommandButton cmdSure
Caption = "确定(&O)"
Height = 375
Left = 3240
TabIndex = 3
Top = 1560
Width = 1095
End
Begin VB.Label lblSN
AutoSize = -1 ''''True
Caption = "请输入正确的序列号："
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 ''''False
Italic = 0 ''''False
Strikethrough = 0 ''''False

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有