📄 trainlarge.frm
字号:
VERSION 5.00
Object = "{27395F88-0C0C-101B-A3C9-08002B2F49FB}#1.1#0"; "PICCLP32.OCX"
Begin VB.Form TrainLarge
BorderStyle = 3 'Fixed Dialog
Caption = "Quad-Ball Training Mode. Arvinder Sehmi 1999, Arvinder@Sehmi.Co.Uk"
ClientHeight = 8970
ClientLeft = 45
ClientTop = 330
ClientWidth = 11985
Icon = "TrainLarge.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
Moveable = 0 'False
ScaleHeight = 8970
ScaleWidth = 11985
ShowInTaskbar = 0 'False
StartUpPosition = 2 'CenterScreen
Begin VB.PictureBox StatBox
Appearance = 0 'Flat
AutoSize = -1 'True
BackColor = &H00C000C0&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 3030
Left = 0
ScaleHeight = 3030
ScaleWidth = 3570
TabIndex = 0
Top = 0
Visible = 0 'False
Width = 3570
Begin VB.Label Label5
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "Total Score"
BeginProperty Font
Name = "Times New Roman"
Size = 27.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FF00&
Height = 510
Left = 900
TabIndex = 12
Top = 1890
Width = 2895
End
Begin VB.Label Label7
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "Top Speed"
BeginProperty Font
Name = "Times New Roman"
Size = 27.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FF00&
Height = 555
Left = -90
TabIndex = 11
Top = 5535
Width = 3885
End
Begin VB.Label Label8
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "Total Bounces"
BeginProperty Font
Name = "Times New Roman"
Size = 27.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FF00&
Height = 645
Left = 135
TabIndex = 10
Top = 6705
Width = 3660
End
Begin VB.Label TotalScore
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "SCORE"
BeginProperty Font
Name = "Times New Roman"
Size = 36
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 825
Left = 4185
TabIndex = 9
Top = 1755
Width = 2490
End
Begin VB.Label TopSpeed
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "TopSpeed"
BeginProperty Font
Name = "Times New Roman"
Size = 36
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 825
Left = 4185
TabIndex = 8
Top = 5400
Width = 3090
End
Begin VB.Label TotalBounces
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "TotalBounces"
BeginProperty Font
Name = "Times New Roman"
Size = 36
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 825
Left = 4230
TabIndex = 7
Top = 6615
Width = 4185
End
Begin VB.Label Label9
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Game Statistics"
BeginProperty Font
Name = "Times New Roman"
Size = 48
Charset = 0
Weight = 400
Underline = -1 'True
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FFFF00&
Height = 1095
Left = 900
TabIndex = 6
Top = 270
Width = 5985
End
Begin VB.Label Label4
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "Total Time"
BeginProperty Font
Name = "Times New Roman"
Size = 27.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FF00&
Height = 510
Left = 945
TabIndex = 5
Top = 3105
Width = 2850
End
Begin VB.Label Label6
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "Highest Time"
BeginProperty Font
Name = "Times New Roman"
Size = 27.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FF00&
Height = 645
Left = 315
TabIndex = 4
Top = 4320
Width = 3480
End
Begin VB.Label AllTime
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "SCORE"
BeginProperty Font
Name = "Times New Roman"
Size = 36
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 825
Left = 4185
TabIndex = 3
Top = 3015
Width = 2490
End
Begin VB.Label HighTime
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "SCORE"
BeginProperty Font
Name = "Times New Roman"
Size = 36
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 825
Left = 4185
TabIndex = 2
Top = 4230
Width = 2490
End
Begin VB.Label OK
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Continue"
BeginProperty Font
Name = "Times New Roman"
Size = 36
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008000&
Height = 825
Left = 7605
TabIndex = 1
Tag = "No"
Top = 7380
Width = 2805
End
End
Begin VB.PictureBox TitleScreen
Appearance = 0 'Flat
AutoSize = -1 'True
BackColor = &H0080C0FF&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 8895
Left = 0
ScaleHeight = 8895
ScaleWidth = 6690
TabIndex = 13
Top = 0
Width = 6690
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 = 6795
TabIndex = 17
Top = 5220
Width = 3225
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 = 6930
TabIndex = 16
Top = 6435
Width = 2955
End
Begin VB.Label Label3
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "Quad-Ball Training Mode"
BeginProperty Font
Name = "Times New Roman"
Size = 36
Charset = 0
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -