📄 form1.frm
字号:
_ExtentX = 847
_ExtentY = 847
_Version = 393216
Flags = 1
End
Begin VB.TextBox MoveText
Appearance = 0 'Flat
BackColor = &H80000016&
BorderStyle = 0 'None
ForeColor = &H00FF0000&
Height = 270
Left = 360
Locked = -1 'True
TabIndex = 32
TabStop = 0 'False
Tag = "0"
Text = "欢迎使用本游戏软件"
ToolTipText = "基本信息"
Top = 7280
Width = 1625
End
Begin VB.Timer Timer2
Interval = 500
Left = 1560
Tag = "0"
Top = 0
End
Begin MSComctlLib.StatusBar StatusBar1
Align = 2 'Align Bottom
Height = 345
Left = 0
TabIndex = 9
ToolTipText = "基本信息"
Top = 7185
Width = 8775
_ExtentX = 15478
_ExtentY = 609
_Version = 393216
BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628}
NumPanels = 6
BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Alignment = 1
Object.Width = 4410
MinWidth = 4410
EndProperty
BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Style = 1
Alignment = 1
Enabled = 0 'False
Object.Width = 1411
MinWidth = 1411
TextSave = "CAPS"
EndProperty
BeginProperty Panel3 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Style = 2
Alignment = 1
Object.Width = 1411
MinWidth = 1411
TextSave = "NUM"
EndProperty
BeginProperty Panel4 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Style = 4
Alignment = 1
Enabled = 0 'False
Object.Width = 1411
MinWidth = 1411
TextSave = "SCRL"
EndProperty
BeginProperty Panel5 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Alignment = 1
Object.Width = 3881
MinWidth = 3881
EndProperty
BeginProperty Panel6 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Alignment = 1
AutoSize = 1
Object.Width = 2778
EndProperty
EndProperty
End
Begin VBVsNetMenu.VsNetMenu VsNetMenu1
Left = 0
Top = 0
_ExtentX = 926
_ExtentY = 926
BmpCount = 10
Bmp:1 = "Form1.frx":170AC
Key:1 = "#Sys:0"
Bmp:2 = "Form1.frx":178B4
Key:2 = "#Sys:60"
Bmp:3 = "Form1.frx":180BC
Key:3 = "#Opt:0"
Bmp:4 = "Form1.frx":188C4
Key:4 = "#Help:0"
Bmp:5 = "Form1.frx":190CC
Key:5 = "#Opt:110"
Bmp:6 = "Form1.frx":198D4
Key:6 = "#Opt:10"
Bmp:7 = "Form1.frx":1A63C
Key:7 = "#Opt:20"
Bmp:8 = "Form1.frx":1B3A4
Key:8 = "#Other:0"
Bmp:9 = "Form1.frx":1BBAC
Key:9 = "#BackgroundMusic:20"
Bmp:10 = "Form1.frx":1C3B4
Key:10 = "#BackgroundMusic:30"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.CommandButton ClickButton
BackColor = &H00FF8080&
Height = 495
Left = 2880
Picture = "Form1.frx":1CBBC
Style = 1 'Graphical
TabIndex = 7
TabStop = 0 'False
ToolTipText = "重置(Ctrl+F2)"
Top = 840
Width = 615
End
Begin 工程1.NUMCTL LEDCount
Height = 405
Left = 4800
TabIndex = 5
TabStop = 0 'False
ToolTipText = "当前步数"
Top = 840
Width = 885
_ExtentX = 1561
_ExtentY = 714
yxstyle = 0 'False
LEDLEN = 4
带小数 = 0 'False
End
Begin VB.CommandButton EndButton
BackColor = &H00FF8080&
Cancel = -1 'True
Caption = "End"
Height = 495
Left = 2880
Style = 1 'Graphical
TabIndex = 2
TabStop = 0 'False
ToolTipText = "作者:范轩轩"
Top = 840
Width = 615
End
Begin VB.Frame BackFrame
BackColor = &H00FF8080&
Height = 5600
Left = 360
TabIndex = 1
Top = 1440
Width = 5600
Begin VB.PictureBox LoadPic
AutoRedraw = -1 'True
AutoSize = -1 'True
Height = 5535
Left = 0
ScaleHeight = 5475
ScaleWidth = 5595
TabIndex = 8
Top = 120
Width = 5655
Begin VB.Image LoadImg
Height = 5535
Left = 0
Picture = "Form1.frx":1D2A6
Stretch = -1 'True
Top = 0
Width = 5655
End
End
Begin VB.PictureBox Num
Appearance = 0 'Flat
AutoRedraw = -1 'True
AutoSize = -1 'True
BackColor = &H80000005&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 975
Index = 1
Left = 480
ScaleHeight = 975
ScaleWidth = 1215
TabIndex = 0
Top = 600
Width = 1215
Begin VB.Image Block
Height = 975
Index = 1
Left = 0
Stretch = -1 'True
Tag = "1"
Top = 0
Width = 1215
End
End
End
Begin MCI.MMControl BkMusic
Height = 495
Left = 480
TabIndex = 3
Tag = "0"
Top = 0
Visible = 0 'False
Width = 390
_ExtentX = 688
_ExtentY = 873
_Version = 393216
BorderStyle = 0
PlayEnabled = -1 'True
PrevVisible = 0 'False
NextVisible = 0 'False
PauseVisible = 0 'False
BackVisible = 0 'False
StepVisible = 0 'False
StopVisible = 0 'False
RecordVisible = 0 'False
EjectVisible = 0 'False
DeviceType = ""
FileName = ""
End
Begin MCI.MMControl Effect
Height = 495
Left = 840
TabIndex = 4
Top = 0
Visible = 0 'False
Width = 390
_ExtentX = 688
_ExtentY = 873
_Version = 393216
BorderStyle = 0
PlayEnabled = -1 'True
PrevVisible = 0 'False
NextVisible = 0 'False
PauseVisible = 0 'False
BackVisible = 0 'False
StepVisible = 0 'False
StopVisible = 0 'False
RecordVisible = 0 'False
EjectVisible = 0 'False
DeviceType = ""
FileName = ""
End
Begin 工程1.NUMCTL LEDTime
Height = 405
Left = 600
TabIndex = 6
TabStop = 0 'False
ToolTipText = "当前时间"
Top = 840
Width = 885
_ExtentX = 1561
_ExtentY = 714
yxstyle = 0 'False
LEDLEN = 4
带小数 = 0 'False
End
Begin WinXPC_Engine.WindowsXPC WindowsXPC1
Left = 5040
Top = 0
_ExtentX = 6588
_ExtentY = 1085
ColorScheme = 2
Common_Dialog = 0 'False
FrameControl = 0 'False
End
Begin VB.Timer Timer1
Enabled = 0 'False
Interval = 1000
Left = 1200
Tag = "作者:范轩轩"
Top = 0
End
Begin VB.Frame StaFrame
BackColor = &H00FF8080&
Caption = " 15迷统计:"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 3495
Left = 6180
TabIndex = 11
ToolTipText = "统计信息"
Top = 840
Width = 2415
Begin VB.Image StaImage
Height = 375
Left = 80
Picture = "Form1.frx":2ED5E
Stretch = -1 'True
ToolTipText = "云南大学"
Top = 0
Width = 375
End
Begin VB.Label Sta
Alignment = 1 'Right Justify
AutoSize = -1 'True
BackColor = &H00FF8080&
BackStyle = 0 'Transparent
Caption = "0"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 240
Index = 6
Left = 1680
TabIndex = 28
ToolTipText = "统计信息"
Top = 3000
Visible = 0 'False
Width = 120
End
Begin VB.Label Sta
Alignment = 1 'Right Justify
AutoSize = -1 'True
BackColor = &H00FF8080&
BackStyle = 0 'Transparent
Caption = "0"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 240
Index = 5
Left = 1680
TabIndex = 27
ToolTipText = "统计信息"
Top = 2520
Width = 120
End
Begin VB.Label Sta
Alignment = 1 'Right Justify
AutoSize = -1 'True
BackColor = &H00FF8080&
BackStyle = 0 'Transparent
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -