📄 frmmain.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Begin VB.Form frmMain
BorderStyle = 1 'Fixed Single
Caption = "ucXTab - Test Harness"
ClientHeight = 3555
ClientLeft = 45
ClientTop = 435
ClientWidth = 6465
Icon = "frmMain.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 3555
ScaleWidth = 6465
StartUpPosition = 2 '屏幕中心
Begin prjucXTab.ucXTab ucXTab1
Height = 3255
Left = 120
TabIndex = 0
Top = 120
Width = 6135
_ExtentX = 10821
_ExtentY = 5741
TabCount = 4
TabCaption(0) = "Tab 0"
TabCaption(1) = "Tab 1"
TabCaption(2) = "Tab 2"
TabCaption(3) = "Tab 3"
ActiveTab = 2
ActiveTabBackEndColor= 16514555
ActiveTabBackStartColor= 16514555
BeginProperty ActiveTabFont {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BackColor = 16514555
DisabledTabBackColor= -2147483633
DisabledTabForeColor= 10526880
ForeColor = -2147483630
InActiveTabBackEndColor= 15397104
InActiveTabBackStartColor= 16777215
BeginProperty InActiveTabFont {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
OuterBorderColor= 10198161
PictureMaskColor= 16711935
ShowFocusRect = 0 'False
TabStripBackColor= 14215660
TabTheme = 1
Begin VB.CheckBox chkFocusRect
BackColor = &H00FBFDFB&
Caption = "Use FocusRect"
Height = 375
Left = -9640
TabIndex = 50
Top = 1680
Width = 2535
End
Begin VB.CommandButton cmdReset
Caption = "Reset"
Height = 300
Left = 5040
TabIndex = 49
Top = 2680
Width = 735
End
Begin VB.CheckBox chkUseImageList
BackColor = &H00FBFDFB&
Caption = "Use ImageList Pictures"
Height = 375
Left = -6760
TabIndex = 48
Top = 1680
Width = 2535
End
Begin VB.CheckBox chkUseMouseWheel
BackColor = &H00FBFDFB&
Caption = "Use MouseWheel Scrolling"
Height = 375
Left = 13240
TabIndex = 47
Top = 2760
Value = 1 'Checked
Width = 2535
End
Begin VB.TextBox txtYRadius
Height = 315
Left = 11440
TabIndex = 45
Text = "txtYRadius"
Top = 2520
Width = 1455
End
Begin VB.TextBox txtXRadius
Height = 315
Left = 11440
TabIndex = 43
Text = "txtXRadius"
Top = 2040
Width = 1455
End
Begin VB.CheckBox chkUseThemeDetection
BackColor = &H00FBFDFB&
Caption = "Use Theme Detection"
Height = 375
Left = 13240
TabIndex = 42
Top = 2400
Value = 1 'Checked
Width = 2535
End
Begin VB.ComboBox cmbTabPictureIndex
Height = 315
Left = -8560
Style = 2 'Dropdown List
TabIndex = 41
Top = 1200
Width = 1455
End
Begin VB.CheckBox chkUseFocusedColor
BackColor = &H00FBFDFB&
Caption = "Use Focused Color"
Height = 255
Left = 3240
TabIndex = 37
Top = 2400
Width = 1815
End
Begin VB.CheckBox chkUseMaskColor
BackColor = &H00FBFDFB&
Caption = "Use Mask Color"
Height = 255
Left = 3240
TabIndex = 36
Top = 2760
Width = 1455
End
Begin VB.ListBox lstColorItems
Height = 2400
Left = 360
TabIndex = 35
Top = 600
Width = 2535
End
Begin VB.CommandButton cmdItemColor
Caption = "..."
Height = 275
Left = 5475
TabIndex = 32
Top = 870
Width = 275
End
Begin VB.ComboBox cmbPictureAlign
Height = 315
Left = -5680
Style = 2 'Dropdown List
TabIndex = 31
Top = 1200
Width = 1455
End
Begin VB.ComboBox cmbPictureSize
Height = 315
Left = -5680
Style = 2 'Dropdown List
TabIndex = 26
Top = 600
Width = 1455
End
Begin VB.ComboBox cmbActiveTab
Height = 315
Left = 11440
Style = 2 'Dropdown List
TabIndex = 17
Top = 1100
Width = 1455
End
Begin VB.TextBox txtActiveTabHeight
Height = 315
Left = 14320
TabIndex = 16
Text = "txtActiveTabHgt"
Top = 600
Width = 1455
End
Begin VB.ComboBox cmbTabCount
Height = 315
Left = 11440
TabIndex = 15
Text = "cmbTabCount"
Top = 600
Width = 1455
End
Begin VB.TextBox txtInActiveTabHeight
Height = 315
Left = 14320
TabIndex = 14
Text = "txtInActiveTabHgt"
Top = 1100
Width = 1455
End
Begin VB.ComboBox cmbTabStyle
Height = 315
Left = 11440
Style = 2 'Dropdown List
TabIndex = 13
Top = 1560
Width = 1455
End
Begin VB.ComboBox cmbTabTheme
Height = 315
Left = 14320
Style = 2 'Dropdown List
TabIndex = 12
Top = 1560
Width = 1455
End
Begin VB.TextBox txtToolTipText
Height = 315
Left = 14320
TabIndex = 11
Text = "txtToolTipText"
Top = 2040
Width = 1455
End
Begin VB.CommandButton cmdStartColor
Caption = "..."
Height = 275
Left = 5475
TabIndex = 6
Top = 1590
Width = 275
End
Begin VB.CommandButton cmdEndColor
Caption = "..."
Height = 275
Left = 5475
TabIndex = 5
Top = 1950
Width = 275
End
Begin VB.TextBox txtStartColor
Height = 315
Left = 4320
TabIndex = 7
Text = "Locate Color..."
Top = 1560
Width = 1455
End
Begin VB.TextBox txtEndColor
Height = 315
Left = 4320
TabIndex = 8
Text = "Locate Color..."
Top = 1920
Width = 1455
End
Begin VB.CommandButton cmdTabPicture
Caption = "..."
Height = 275
Index = 6
Left = -7405
TabIndex = 28
Top = 630
Width = 275
End
Begin VB.TextBox txtTabPicture
Height = 315
Left = -8560
TabIndex = 29
Text = "Locate Picture..."
Top = 600
Width = 1455
End
Begin VB.TextBox txtItemColor
Height = 315
Left = 4320
TabIndex = 33
Text = "Locate Color..."
Top = 840
Width = 1455
End
Begin VB.Label lblVersion
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "Version: 1.0.48"
Height = 255
Left = 24560
TabIndex = 51
Top = 2340
Width = 1335
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -