📄 fmenu.frm
字号:
VERSION 5.00
Begin VB.Form fMenu
BackColor = &H00000040&
BorderStyle = 0 'None
ClientHeight = 6000
ClientLeft = 0
ClientTop = 0
ClientWidth = 7500
ControlBox = 0 'False
BeginProperty Font
Name = "Arial"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FFFFFF&
Icon = "fMenu.frx":0000
KeyPreview = -1 'True
LinkTopic = "Eye3D"
MaxButton = 0 'False
MinButton = 0 'False
MouseIcon = "fMenu.frx":0442
MousePointer = 99 'Custom
Moveable = 0 'False
Picture = "fMenu.frx":074C
ScaleHeight = 400
ScaleMode = 3 'Pixel
ScaleWidth = 500
StartUpPosition = 2 'CenterScreen
Begin VB.Line lneCaption
BorderColor = &H00004080&
Index = 16
X1 = 237
X2 = 251
Y1 = 384
Y2 = 384
End
Begin VB.Shape shpButton
BackColor = &H00000000&
BorderColor = &H00004080&
Height = 420
Index = 15
Left = 2265
Shape = 4 'Rounded Rectangle
Top = 5400
Width = 1290
End
Begin VB.Label lblButton
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "Info"
BeginProperty Font
Name = "Arial"
Size = 14.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004080&
Height = 330
Index = 15
Left = 2385
TabIndex = 25
Top = 5445
Width = 1050
End
Begin VB.Line lneCaption
BorderColor = &H00004080&
Index = 14
X1 = 365
X2 = 374
Y1 = 384
Y2 = 384
End
Begin VB.Line lneCaption
BorderColor = &H00004080&
Index = 7
X1 = 256
X2 = 277
Y1 = 88
Y2 = 88
End
Begin VB.Shape shpButton
BackColor = &H00000000&
BorderColor = &H00004080&
Height = 345
Index = 14
Left = 4155
Shape = 4 'Rounded Rectangle
Top = 1050
Width = 3165
End
Begin VB.Label lblButton
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "Not detected"
BeginProperty Font
Name = "Arial"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004080&
Height = 225
Index = 14
Left = 4275
TabIndex = 24
Top = 1110
Width = 2925
End
Begin VB.Line lneBorder
BorderColor = &H00404040&
Index = 3
X1 = 499
X2 = 499
Y1 = 402
Y2 = 2
End
Begin VB.Line lneBorder
BorderColor = &H00404040&
Index = 2
X1 = 0
X2 = 499
Y1 = 399
Y2 = 399
End
Begin VB.Line lneBorder
BorderColor = &H00C0C0C0&
Index = 1
X1 = 0
X2 = 0
Y1 = 0
Y2 = 399
End
Begin VB.Line lneBorder
BorderColor = &H00C0C0C0&
Index = 0
X1 = 1
X2 = 500
Y1 = 0
Y2 = 0
End
Begin VB.Label lblButton
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "ENABLED"
BeginProperty Font
Name = "Arial"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004080&
Height = 270
Index = 13
Left = 5220
TabIndex = 22
Top = 3735
Width = 2025
End
Begin VB.Shape shpButton
BackColor = &H00000000&
BorderColor = &H00004080&
Height = 345
Index = 13
Left = 5160
Shape = 4 'Rounded Rectangle
Top = 3690
Width = 2175
End
Begin VB.Label lblCaption
BackStyle = 0 'Transparent
Caption = "Specular lighting"
ForeColor = &H00004080&
Height = 270
Index = 8
Left = 2235
TabIndex = 23
Top = 3780
Width = 1995
End
Begin VB.Line lneCaption
BorderColor = &H00004080&
Index = 15
X1 = 148
X2 = 345
Y1 = 266
Y2 = 266
End
Begin VB.Line lneCaption
BorderColor = &H00004080&
Index = 13
X1 = 10
X2 = 151
Y1 = 384
Y2 = 384
End
Begin VB.Label lblStats
BackColor = &H00000000&
BackStyle = 0 'Transparent
Caption = "xxxxxxx"
ForeColor = &H00004080&
Height = 210
Left = 150
TabIndex = 21
Top = 5550
Width = 1800
End
Begin VB.Label lblButton
BackStyle = 0 'Transparent
Caption = "||||||||||||||||||||"
BeginProperty Font
Name = "Arial"
Size = 11.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004080&
Height = 270
Index = 10
Left = 4980
TabIndex = 18
Top = 4680
Width = 1245
End
Begin VB.Label lblButton
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "Start"
BeginProperty Font
Name = "Arial"
Size = 14.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004080&
Height = 330
Index = 12
Left = 5700
TabIndex = 20
Top = 5445
Width = 1575
End
Begin VB.Label lblButton
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "Quit"
BeginProperty Font
Name = "Arial"
Size = 14.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004080&
Height = 330
Index = 11
Left = 3885
TabIndex = 19
Top = 5445
Width = 1485
End
Begin VB.Line lneCaption
BorderColor = &H00004080&
Index = 12
X1 = 416
X2 = 433
Y1 = 331
Y2 = 331
End
Begin VB.Line lneCaption
BorderColor = &H00004080&
Index = 11
X1 = 313
X2 = 329
Y1 = 331
Y2 = 331
End
Begin VB.Shape shpButton
BackColor = &H00000000&
BorderColor = &H00004080&
Height = 345
Index = 10
Left = 4920
Shape = 4 'Rounded Rectangle
Top = 4650
Width = 1335
End
Begin VB.Label lblButton
BackStyle = 0 'Transparent
Caption = "SMALL"
BeginProperty Font
Name = "Arial"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004080&
Height = 270
Index = 9
Left = 3885
TabIndex = 17
Top = 4695
Width = 690
End
Begin VB.Line lneCaption
BorderColor = &H00004080&
Index = 10
X1 = 150
X2 = 256
Y1 = 331
Y2 = 331
End
Begin VB.Label lblButton
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "LARGE"
BeginProperty Font
Name = "Arial"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004080&
Height = 270
Index = 8
Left = 6570
TabIndex = 16
Top = 4695
Width = 690
End
Begin VB.Label lblCaption
BackStyle = 0 'Transparent
Caption = "Screen size"
ForeColor = &H00004080&
Height = 270
Index = 6
Left = 2250
TabIndex = 15
Top = 4740
Width = 1275
End
Begin VB.Line lneCaption
BorderColor = &H00004080&
Index = 5
X1 = 149
X2 = 346
Y1 = 295
Y2 = 295
End
Begin VB.Label lblButton
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "ENABLED"
BeginProperty Font
Name = "Arial"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -