📄 form1.frm
字号:
VERSION 5.00
Begin VB.Form Form1
AutoRedraw = -1 'True
BorderStyle = 1 'Fixed Single
Caption = "是男人就挺过20秒"
ClientHeight = 4185
ClientLeft = 45
ClientTop = 435
ClientWidth = 5610
Icon = "Form1.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 4185
ScaleWidth = 5610
StartUpPosition = 3 '窗口缺省
Begin VB.Timer Timer7
Enabled = 0 'False
Interval = 1000
Left = 5040
Top = 2640
End
Begin VB.Timer Timer6
Enabled = 0 'False
Interval = 100
Left = 5040
Top = 3600
End
Begin VB.PictureBox Picture2
BackColor = &H00000000&
BorderStyle = 0 'None
Height = 495
Left = 4080
ScaleHeight = 495
ScaleWidth = 1095
TabIndex = 2
Top = 720
Width = 1095
End
Begin VB.Timer Timer5
Interval = 100
Left = 4440
Top = 3600
End
Begin VB.Timer Timer4
Interval = 200
Left = 5040
Top = 3120
End
Begin VB.Timer Timer3
Interval = 50
Left = 4440
Top = 3120
End
Begin VB.Timer Timer2
Interval = 100
Left = 3720
Top = 3120
End
Begin VB.PictureBox Picture1
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 375
Left = 2760
Picture = "Form1.frx":030A
ScaleHeight = 375
ScaleWidth = 360
TabIndex = 0
Top = 1800
Width = 360
End
Begin VB.Timer Timer1
Interval = 70
Left = 1560
Top = 2160
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 75
Index = 49
Left = 0
Shape = 2 'Oval
Top = 0
Width = 75
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 48
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 47
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 46
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 45
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 44
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 43
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 42
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 41
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 40
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 39
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 38
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 37
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 36
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 35
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 34
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 33
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 32
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 31
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 30
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 29
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 28
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 27
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 26
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 25
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 24
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 23
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 22
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 21
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 20
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 19
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 18
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 17
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 16
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
FillStyle = 0 'Solid
Height = 80
Index = 15
Left = 0
Shape = 2 'Oval
Top = 0
Width = 80
End
Begin VB.Shape enemy
BorderStyle = 0 'Transparent
FillColor = &H008080FF&
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -