📄 main.frm
字号:
VERSION 5.00
Begin VB.Form Form1
Appearance = 0 'Flat
AutoRedraw = -1 'True
BackColor = &H8000000C&
BorderStyle = 0 'None
Caption = "Initializing..."
ClientHeight = 2550
ClientLeft = 810
ClientTop = 825
ClientWidth = 2025
FillColor = &H80000001&
Icon = "Main.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
Moveable = 0 'False
ScaleHeight = 2550
ScaleWidth = 2025
Visible = 0 'False
Begin VB.Timer Timer1
Left = 2340
Top = 390
End
Begin VB.Image ResetButton
Height = 150
Left = 1605
MousePointer = 99 'Custom
Top = 405
Visible = 0 'False
Width = 150
End
Begin VB.Image BackView
Height = 2550
Left = 4905
MousePointer = 99 'Custom
Top = 0
Visible = 0 'False
Width = 2100
End
Begin VB.Image ButtonC
Height = 240
Left = 2265
MousePointer = 99 'Custom
Top = 15
Width = 240
End
Begin VB.Image ButtonB
Height = 240
Left = 1935
MousePointer = 99 'Custom
Top = 105
Width = 240
End
Begin VB.Image ButtonA
Height = 240
Left = 1605
MousePointer = 99 'Custom
Top = 45
Width = 240
End
Begin VB.Image FrontView
Height = 2550
Left = 2790
MousePointer = 99 'Custom
Top = 0
Width = 2100
End
Begin VB.Image Water
Height = 510
Left = 2565
Top = 1290
Visible = 0 'False
Width = 195
End
Begin VB.Image TempMeal
Height = 255
Index = 7
Left = 4065
Top = 3105
Visible = 0 'False
Width = 255
End
Begin VB.Image TempMeal
Height = 255
Index = 6
Left = 3825
Top = 3105
Visible = 0 'False
Width = 255
End
Begin VB.Image AngelIcon
Height = 480
Index = 1
Left = 990
Top = 3375
Visible = 0 'False
Width = 480
End
Begin VB.Image ResultNumber
Height = 225
Left = 660
Top = 1860
Visible = 0 'False
Width = 135
End
Begin VB.Image TamNumber
Height = 225
Left = 540
Top = 1860
Visible = 0 'False
Width = 135
End
Begin VB.Image TempChar
Height = 285
Index = 3
Left = 4545
Top = 4155
Visible = 0 'False
Width = 255
End
Begin VB.Image TempChar
Height = 285
Index = 2
Left = 4305
Top = 4155
Visible = 0 'False
Width = 255
End
Begin VB.Image TempChar
Height = 285
Index = 1
Left = 4065
Top = 4155
Visible = 0 'False
Width = 255
End
Begin VB.Image TempIcon
Height = 480
Index = 7
Left = 3315
Top = 3960
Visible = 0 'False
Width = 480
End
Begin VB.Image TempUnhappy
Height = 285
Index = 3
Left = 2580
Top = 4470
Visible = 0 'False
Width = 510
End
Begin VB.Image TempUnhappy
Height = 285
Index = 2
Left = 2085
Top = 4470
Visible = 0 'False
Width = 510
End
Begin VB.Image AngelIcon
Height = 480
Index = 0
Left = 660
Top = 3375
Visible = 0 'False
Width = 480
End
Begin VB.Image TempIcon
Height = 480
Index = 6
Left = 2850
Top = 3960
Visible = 0 'False
Width = 480
End
Begin VB.Image TempIcon
Height = 480
Index = 5
Left = 2385
Top = 3960
Visible = 0 'False
Width = 480
End
Begin VB.Image TempChangingScreen
Height = 510
Index = 7
Left = 5280
Top = 5325
Visible = 0 'False
Width = 1020
End
Begin VB.Image TempChangingScreen
Height = 510
Index = 6
Left = 4260
Top = 5325
Visible = 0 'False
Width = 1020
End
Begin VB.Image TempChangingScreen
Height = 510
Index = 5
Left = 3240
Top = 5325
Visible = 0 'False
Width = 1020
End
Begin VB.Image TempChangingScreen
Height = 510
Index = 4
Left = 2220
Top = 5325
Visible = 0 'False
Width = 1020
End
Begin VB.Image TempChangingScreen
Height = 510
Index = 3
Left = 1200
Top = 5325
Visible = 0 'False
Width = 1020
End
Begin VB.Image TempChangingScreen
Height = 510
Index = 2
Left = 5280
Top = 4815
Visible = 0 'False
Width = 1020
End
Begin VB.Image TempChangingScreen
Height = 510
Index = 1
Left = 4260
Top = 4815
Visible = 0 'False
Width = 1020
End
Begin VB.Image ChangingScreen
Height = 510
Left = 2265
Top = 4815
Visible = 0 'False
Width = 1020
End
Begin VB.Image TempChangingScreen
Height = 510
Index = 0
Left = 3270
Top = 4815
Visible = 0 'False
Width = 1020
End
Begin VB.Image Stars
Height = 480
Index = 1
Left = 1785
Top = 4830
Visible = 0 'False
Width = 450
End
Begin VB.Image Stars
Height = 480
Index = 0
Left = 1215
Top = 4830
Visible = 0 'False
Width = 450
End
Begin VB.Image Yr
Height = 195
Left = 1575
Top = 2610
Visible = 0 'False
Width = 225
End
Begin VB.Image Angel
Height = 450
Left = 6285
Top = 4005
Visible = 0 'False
Width = 450
End
Begin VB.Image NullIcon
Height = 480
Left = 1410
Top = 3390
Visible = 0 'False
Width = 480
End
Begin VB.Image TamScore
Height = 225
Left = 600
Top = 5610
Visible = 0 'False
Width = 135
End
Begin VB.Image YourScore
Height = 225
Left = 90
Top = 5610
Visible = 0 'False
Width = 135
End
Begin VB.Image PlayResult
Height = 480
Left = 45
Top = 5355
Visible = 0 'False
Width = 705
End
Begin VB.Image PlayTitle
Height = 510
Left = 45
Top = 4800
Visible = 0 'False
Width = 1020
End
Begin VB.Image TempPlay
Height = 285
Index = 3
Left = 3840
Top = 4470
Visible = 0 'False
Width = 255
End
Begin VB.Image TempPlay
Height = 285
Index = 2
Left = 3600
Top = 4470
Visible = 0 'False
Width = 255
End
Begin VB.Image TempPlay
Height = 285
Index = 1
Left = 3360
Top = 4470
Visible = 0 'False
Width = 255
End
Begin VB.Image TempPlay
Height = 285
Index = 0
Left = 3120
Top = 4470
Visible = 0 'False
Width = 255
End
Begin VB.Image TempDark
Height = 510
Index = 2
Left = 6180
Top = 3435
Visible = 0 'False
Width = 1020
End
Begin VB.Image TempDark
Height = 510
Index = 1
Left = 5145
Top = 3435
Visible = 0 'False
Width = 1020
End
Begin VB.Image TempDark
Height = 510
Index = 0
Left = 4110
Top = 3435
Visible = 0 'False
Width = 1020
End
Begin VB.Image SleepIcon
Height = 480
Index = 1
Left = 3705
Top = 3420
Visible = 0 'False
Width = 480
End
Begin VB.Image SleepIcon
Height = 480
Index = 0
Left = 3210
Top = 3420
Visible = 0 'False
Width = 480
End
Begin VB.Image TempSleep
Height = 105
Index = 1
Left = 4440
Top = 4650
Visible = 0 'False
Width = 330
End
Begin VB.Image TempSleep
Height = 105
Index = 0
Left = 4125
Top = 4650
Visible = 0 'False
Width = 330
End
Begin VB.Image TempSleepSign
Height = 255
Index = 1
Left = 4650
Top = 3105
Visible = 0 'False
Width = 225
End
Begin VB.Image TempSleepSign
Height = 255
Index = 0
Left = 4365
Top = 3105
Visible = 0 'False
Width = 225
End
Begin VB.Image SleepSign
Height = 255
Left = 2445
Top = 2835
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -