📄 mainfrm.frm
字号:
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Terminal"
Size = 13.5
Charset = 255
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.Label TrainingMode
Alignment = 2 'Center
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Play In Training Mode"
BeginProperty Font
Name = "Times New Roman"
Size = 27.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008000&
Height = 630
Left = 5940
TabIndex = 51
Top = 6165
Width = 4965
End
Begin VB.Label Label3
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "Quad-Ball Story Mode."
BeginProperty Font
Name = "Times New Roman"
Size = 26.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FF00&
Height = 555
Left = 225
TabIndex = 50
Top = 7830
Width = 11490
End
Begin VB.Label Story
Alignment = 2 'Center
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Show Story"
BeginProperty Font
Name = "Times New Roman"
Size = 27.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008000&
Height = 585
Left = 6885
TabIndex = 9
Top = 5580
Width = 3075
End
Begin VB.Label Quit
Alignment = 2 'Center
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Quit Game"
BeginProperty Font
Name = "Times New Roman"
Size = 27.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008000&
Height = 585
Left = 6885
TabIndex = 8
Top = 6705
Width = 2955
End
Begin VB.Label Start
Alignment = 2 'Center
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Start Game"
BeginProperty Font
Name = "Times New Roman"
Size = 27.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008000&
Height = 585
Left = 6840
TabIndex = 7
Top = 5040
Width = 3225
End
End
Begin VB.PictureBox Info
Appearance = 0 'Flat
BackColor = &H0000C0C0&
ForeColor = &H80000008&
Height = 9000
Left = 10320
ScaleHeight = 8970
ScaleWidth = 1650
TabIndex = 20
Top = 0
Width = 1680
Begin VB.Timer TimeKeeper
Enabled = 0 'False
Interval = 900
Left = 1260
Top = 3690
End
Begin VB.Label Reset
Alignment = 2 'Center
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Reset"
BeginProperty Font
Name = "Times New Roman"
Size = 20.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008000&
Height = 435
Left = 360
TabIndex = 49
Tag = "no"
Top = 5850
Width = 1005
End
Begin VB.Image InfoArea
Height = 9015
Left = -45
Stretch = -1 'True
Top = 0
Width = 1770
End
Begin VB.Label HighName
Alignment = 2 'Center
BackStyle = 0 'Transparent
BeginProperty Font
Name = "Times New Roman"
Size = 14.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000080FF&
Height = 600
Left = 90
TabIndex = 47
Top = 4950
Width = 1455
End
Begin VB.Label HighestScore
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "000000"
BeginProperty Font
Name = "Times New Roman"
Size = 20.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FF00&
Height = 465
Left = 90
TabIndex = 46
Top = 4545
Width = 1455
End
Begin VB.Label Label2
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000005&
BackStyle = 0 'Transparent
Caption = "High Score"
BeginProperty Font
Name = "Times New Roman"
Size = 14.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 375
Left = 90
TabIndex = 33
Top = 4275
Width = 1455
WordWrap = -1 'True
End
Begin VB.Shape Shape4
BorderColor = &H00FFFF00&
Height = 1320
Left = 90
Top = 4275
Width = 1455
End
Begin VB.Label LifeTxt
Alignment = 2 'Center
BackStyle = 0 'Transparent
BeginProperty Font
Name = "Times New Roman"
Size = 13.5
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 285
Index = 1
Left = 1080
TabIndex = 23
Top = 2655
Width = 375
End
Begin VB.Label LifeTxt
Alignment = 2 'Center
BackStyle = 0 'Transparent
BeginProperty Font
Name = "Times New Roman"
Size = 13.5
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FF00&
Height = 285
Index = 2
Left = 630
TabIndex = 22
Top = 2655
Width = 375
End
Begin VB.Label LifeTxt
Alignment = 2 'Center
BackStyle = 0 'Transparent
BeginProperty Font
Name = "Times New Roman"
Size = 13.5
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 285
Index = 3
Left = 180
TabIndex = 21
Top = 2655
Width = 375
End
Begin VB.Shape ScoreBox
Height = 825
Left = 90
Top = -5000
Width = 1410
End
Begin VB.Label ScoreLable
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000005&
BackStyle = 0 'Transparent
Caption = "Score"
BeginProperty Font
Name = "Times New Roman"
Size = 15.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 420
Left = 90
TabIndex = 32
Top = 90
Width = 1410
End
Begin VB.Label Score
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "0"
BeginProperty Font
Name = "Times New Roman"
Size = 20.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 465
Left = 90
TabIndex = 31
Top = 450
Width = 1410
End
Begin VB.Shape TimeBox
BackColor = &H0000FF00&
BorderColor = &H0000FF00&
Height = 1050
Left = 90
Top = 990
Width = 1410
End
Begin VB.Label TimeLabel
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000005&
BackStyle = 0 'Transparent
Caption = "Time"
BeginProperty Font
Name = "Times New Roman"
Size = 15.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 420
Left = 90
TabIndex = 30
Top = 990
Width = 1410
End
Begin VB.Label TimeSoFar
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "00:00:00"
BeginProperty Font
Name = "Times New Roman"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 420
Left = 90
TabIndex = 29
Top = 1395
Width = 1410
End
Begin VB.Label AimTime
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "00:00:00"
BeginProperty Font
Name = "Times New Roman"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 420
Left = 90
TabIndex = 28
Top = 1710
Width = 1410
End
Begin VB.Image Life
Height = 375
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -