rbdisplay.frm
来自「PC端的USB主机源代码」· FRM 代码 · 共 2,156 行 · 第 1/5 页
FRM
2,156 行
FillStyle = 0 'Solid
Height = 255
Index = 15
Left = 3720
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 14
Left = 3480
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 14
Left = 3480
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 14
Left = 3480
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 13
Left = 3240
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 13
Left = 3240
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 12
Left = 3000
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 12
Left = 3000
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 11
Left = 2760
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 11
Left = 2760
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 10
Left = 2520
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 10
Left = 2520
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 9
Left = 2280
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 9
Left = 2280
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 8
Left = 2040
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 8
Left = 2040
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 7
Left = 1800
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 7
Left = 1800
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 6
Left = 1560
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 6
Left = 1560
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 5
Left = 1320
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 5
Left = 1320
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 4
Left = 1080
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 4
Left = 1080
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 3
Left = 840
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 3
Left = 840
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 2
Left = 600
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 2
Left = 600
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 1
Left = 360
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 1
Left = 360
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED6
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 0
Left = 120
Shape = 3 'Circle
Top = 2880
Width = 255
End
Begin VB.Shape LED5
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 0
Left = 120
Shape = 3 'Circle
Top = 2640
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 13
Left = 3240
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 12
Left = 3000
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 11
Left = 2760
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 10
Left = 2520
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 9
Left = 2280
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 8
Left = 2040
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 7
Left = 1800
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 6
Left = 1560
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 5
Left = 1320
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 4
Left = 1080
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
Index = 3
Left = 840
Shape = 3 'Circle
Top = 2400
Width = 255
End
Begin VB.Shape LED4
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 255
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?