📄 game.frm
字号:
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 2280
Style = 1 'Graphical
TabIndex = 1
Top = 1800
Width = 615
End
Begin VB.TextBox Text1
BackColor = &H00FFFFFF&
BeginProperty DataFormat
Type = 0
Format = "0"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 2052
SubFormatType = 0
EndProperty
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 120
MousePointer = 3 'I-Beam
TabIndex = 0
ToolTipText = "请输入一个四位数"
Top = 1800
Width = 2055
End
Begin VB.CommandButton Command1
BackColor = &H00C0C0C0&
Caption = "重新开局(F2)"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 120
MaskColor = &H8000000F&
Style = 1 'Graphical
TabIndex = 2
Top = 120
Width = 2775
End
Begin VB.Frame 级别设置
BackColor = &H00C0C0C0&
Caption = "级别设置"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 120
TabIndex = 16
Top = 960
Width = 2775
Begin VB.OptionButton Option2
BackColor = &H00C0C0C0&
Caption = "高级(&E)"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 1440
TabIndex = 17
Top = 240
Width = 1215
End
Begin VB.OptionButton Option1
BackColor = &H00C0C0C0&
Caption = "初级(&B)"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 3
Top = 240
Width = 1095
End
End
Begin VB.Line Line6
BorderColor = &H00808080&
X1 = 0
X2 = 6120
Y1 = 0
Y2 = 0
End
Begin VB.Line Line5
BorderColor = &H00FFFFFF&
BorderWidth = 2
X1 = 0
X2 = 6120
Y1 = 15
Y2 = 15
End
Begin VB.Line Line4
BorderColor = &H00808080&
X1 = 2985
X2 = 2985
Y1 = 120
Y2 = 4680
End
Begin VB.Line Line3
BorderColor = &H00FFFFFF&
BorderWidth = 2
X1 = 3000
X2 = 3000
Y1 = 120
Y2 = 4680
End
Begin VB.Line Line2
BorderColor = &H00808080&
X1 = 120
X2 = 3000
Y1 = 825
Y2 = 825
End
Begin VB.Line Line1
BorderColor = &H00FFFFFF&
BorderWidth = 2
X1 = 120
X2 = 3000
Y1 = 840
Y2 = 840
End
Begin VB.Label Label4
BackColor = &H00C0C0C0&
Caption = "步"
Height = 255
Left = 4920
TabIndex = 45
Top = 4440
Width = 255
End
Begin VB.Label Label3
BackColor = &H00C0C0C0&
Height = 255
Left = 4560
TabIndex = 44
Top = 4440
Width = 255
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 47
Left = 5280
Shape = 2 'Oval
Top = 4080
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 46
Left = 4800
Shape = 2 'Oval
Top = 4080
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 45
Left = 4320
Shape = 2 'Oval
Top = 4080
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 44
Left = 3840
Shape = 2 'Oval
Top = 4080
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 43
Left = 5280
Shape = 2 'Oval
Top = 3720
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 42
Left = 4800
Shape = 2 'Oval
Top = 3720
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 41
Left = 4320
Shape = 2 'Oval
Top = 3720
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 40
Left = 3840
Shape = 2 'Oval
Top = 3720
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 39
Left = 5280
Shape = 2 'Oval
Top = 3360
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 38
Left = 4800
Shape = 2 'Oval
Top = 3360
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 37
Left = 4320
Shape = 2 'Oval
Top = 3360
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 36
Left = 3840
Shape = 2 'Oval
Top = 3360
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 35
Left = 5280
Shape = 2 'Oval
Top = 3000
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 34
Left = 4800
Shape = 2 'Oval
Top = 3000
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 33
Left = 4320
Shape = 2 'Oval
Top = 3000
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 32
Left = 3840
Shape = 2 'Oval
Top = 3000
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 31
Left = 5280
Shape = 2 'Oval
Top = 2640
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 30
Left = 4800
Shape = 2 'Oval
Top = 2640
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 29
Left = 4320
Shape = 2 'Oval
Top = 2640
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 28
Left = 3840
Shape = 2 'Oval
Top = 2640
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 27
Left = 5280
Shape = 2 'Oval
Top = 2280
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 26
Left = 4800
Shape = 2 'Oval
Top = 2280
Width = 375
End
Begin VB.Shape Shape1
FillColor = &H00FFFFFF&
FillStyle = 0 'Solid
Height = 255
Index = 25
Left = 4320
Shape = 2 'Oval
Top = 2280
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -