📄 frmqueue.frm
字号:
VERSION 5.00
Begin VB.Form frmQueue
Caption = "吹风排队画面"
ClientHeight = 2145
ClientLeft = 60
ClientTop = 345
ClientWidth = 7875
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 2145
ScaleWidth = 7875
StartUpPosition = 2 '屏幕中心
WhatsThisHelp = -1 'True
Begin VB.Timer Timer1
Interval = 1000
Left = 720
Top = 2280
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 74
Left = 3705
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 73
Left = 7515
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 72
Left = 7035
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 71
Left = 6570
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 70
Left = 6090
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 69
Left = 5610
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 68
Left = 5130
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 67
Left = 4650
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 66
Left = 4185
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 65
Left = 3225
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 64
Left = 2745
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 63
Left = 2265
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 62
Left = 1800
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 61
Left = 1320
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 60
Left = 840
Shape = 3 'Circle
Top = 1800
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 59
Left = 3705
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 58
Left = 7515
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 57
Left = 7035
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 56
Left = 6570
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 55
Left = 6090
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 54
Left = 5610
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 53
Left = 5130
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 52
Left = 4650
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 51
Left = 4185
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 50
Left = 3225
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 49
Left = 2745
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 48
Left = 2265
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 47
Left = 1800
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 46
Left = 1320
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 45
Left = 840
Shape = 3 'Circle
Top = 1440
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 44
Left = 3705
Shape = 3 'Circle
Top = 1080
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 43
Left = 7515
Shape = 3 'Circle
Top = 1080
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 42
Left = 7035
Shape = 3 'Circle
Top = 1080
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 41
Left = 6570
Shape = 3 'Circle
Top = 1080
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 40
Left = 6090
Shape = 3 'Circle
Top = 1080
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
Index = 39
Left = 5610
Shape = 3 'Circle
Top = 1080
Width = 225
End
Begin VB.Shape Shape1
BackStyle = 1 'Opaque
BorderColor = &H000000FF&
BorderStyle = 0 'Transparent
FillStyle = 0 'Solid
Height = 225
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -