📄 form1.frm
字号:
VERSION 5.00
Begin VB.Form form1
BorderStyle = 1 'Fixed Single
ClientHeight = 2190
ClientLeft = 15
ClientTop = 45
ClientWidth = 9660
ControlBox = 0 'False
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Icon = "Form1.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
ScaleHeight = 2190
ScaleWidth = 9660
StartUpPosition = 2 'CenterScreen
Begin VB.Timer Timer1
Enabled = 0 'False
Interval = 2000
Left = 7125
Top = 1650
End
Begin VB.Timer checkUP
Interval = 100
Left = 675
Top = 5550
End
Begin VB.CommandButton cmdAbout
Caption = "About..."
BeginProperty Font
Name = "Tahoma"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 390
Left = 8175
TabIndex = 79
Top = 1725
Width = 1320
End
Begin VB.Frame frFiles
Caption = "Load / Save"
Enabled = 0 'False
Height = 1215
Left = 150
TabIndex = 71
Top = 8700
Visible = 0 'False
Width = 4890
Begin VB.CommandButton Command3
Caption = "Load"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 150
TabIndex = 75
Top = 525
Width = 975
End
Begin VB.CommandButton Command4
Caption = "Save"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 150
TabIndex = 74
Top = 825
Width = 975
End
Begin VB.TextBox txtio
Appearance = 0 'Flat
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Left = 2475
TabIndex = 73
Text = "C:\mycomp.dat"
Top = 750
Width = 2235
End
Begin VB.TextBox txtname
Appearance = 0 'Flat
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Left = 2475
MaxLength = 12
TabIndex = 72
Text = "My Computer "
Top = 450
Width = 2235
End
Begin VB.Label Label18
Caption = "Save title"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 1425
TabIndex = 77
Top = 525
Width = 1095
End
Begin VB.Label Label19
Caption = "Load/Save.."
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 1425
TabIndex = 76
Top = 825
Width = 975
End
End
Begin VB.Frame frResults
Caption = "Results"
Height = 2415
Left = 150
TabIndex = 46
Top = 6225
Width = 9390
Begin VB.CommandButton Command2
Caption = "Next Comparison"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 75
TabIndex = 47
Top = 1950
Width = 1500
End
Begin VB.Label lblcomps7
Caption = "298.2s"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 6075
TabIndex = 85
Top = 1050
Visible = 0 'False
Width = 615
End
Begin VB.Label lblcomp7
Caption = "Intel Celeron 266@274mhz, 64MB,Win2k"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 615
Left = 975
TabIndex = 84
Top = 750
Visible = 0 'False
Width = 1335
End
Begin VB.Shape ShapeCOMP7
FillStyle = 0 'Solid
Height = 255
Left = 2400
Top = 750
Visible = 0 'False
Width = 5964
End
Begin VB.Label lblcomp1b
Caption = "75.7s"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 2925
TabIndex = 83
Top = 1050
Visible = 0 'False
Width = 390
End
Begin VB.Label lblcompb
Caption = "Intel PIII 700@936mhz, 256MB,Win2k"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 615
Left = 975
TabIndex = 82
Top = 750
Visible = 0 'False
Width = 1335
End
Begin VB.Shape shapecompb
FillStyle = 0 'Solid
Height = 255
Left = 2400
Top = 750
Visible = 0 'False
Width = 1514
End
Begin VB.Shape Shape1
BorderColor = &H00000000&
FillColor = &H00C1B0AE&
FillStyle = 0 'Solid
Height = 255
Left = 2400
Top = 375
Width = 15
End
Begin VB.Label Label10
Caption = "Your CPU"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 255
Left = 975
TabIndex = 70
Top = 450
Width = 735
End
Begin VB.Line Line3
BorderColor = &H00000000&
BorderStyle = 3 'Dot
X1 = 2385
X2 = 2385
Y1 = 300
Y2 = 1830
End
Begin VB.Shape ShapeCOMP4
FillStyle = 0 'Solid
Height = 255
Left = 2400
Top = 750
Visible = 0 'False
Width = 1815
End
Begin VB.Label lblCOMP4
Caption = "Intel PIII 700@770mhz, 384MB,Win2k"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 615
Left = 975
TabIndex = 69
Top = 750
Visible = 0 'False
Width = 1335
End
Begin VB.Line Line4
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -