📄 frm_yhgz.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form frm_yhgz
BorderStyle = 3 'Fixed Dialog
Caption = "优惠项目初始化"
ClientHeight = 5205
ClientLeft = 2760
ClientTop = 3750
ClientWidth = 6315
Icon = "frm_yhgz.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 5205
ScaleWidth = 6315
ShowInTaskbar = 0 'False
StartUpPosition = 2 'CenterScreen
Begin VB.PictureBox Picture2
Height = 1890
Left = 4785
ScaleHeight = 1830
ScaleWidth = 1155
TabIndex = 6
Top = 660
Visible = 0 'False
Width = 1215
Begin VB.CommandButton Command1
Height = 435
Index = 6
Left = 30
MaskColor = &H00FFFFFF&
Picture = "frm_yhgz.frx":000C
Style = 1 'Graphical
TabIndex = 8
Top = 960
UseMaskColor = -1 'True
Width = 1095
End
Begin VB.CommandButton Command1
Height = 435
Index = 5
Left = 30
MaskColor = &H00FFFFFF&
Picture = "frm_yhgz.frx":0FC6
Style = 1 'Graphical
TabIndex = 7
Top = 435
UseMaskColor = -1 'True
Width = 1095
End
End
Begin VB.PictureBox Picture1
Height = 1890
Left = 4785
ScaleHeight = 1830
ScaleWidth = 1155
TabIndex = 1
Top = 660
Width = 1215
Begin VB.CommandButton Command1
Cancel = -1 'True
Height = 435
Index = 4
Left = 30
MaskColor = &H00FFFFFF&
Picture = "frm_yhgz.frx":2724
Style = 1 'Graphical
TabIndex = 5
Top = 1380
UseMaskColor = -1 'True
Width = 1095
End
Begin VB.CommandButton Command1
Height = 435
Index = 2
Left = 30
MaskColor = &H00FFFFFF&
Picture = "frm_yhgz.frx":36DE
Style = 1 'Graphical
TabIndex = 4
Top = 930
UseMaskColor = -1 'True
Width = 1095
End
Begin VB.CommandButton Command1
Height = 435
Index = 1
Left = 30
MaskColor = &H00FFFFFF&
Picture = "frm_yhgz.frx":5BB0
Style = 1 'Graphical
TabIndex = 3
Top = 480
UseMaskColor = -1 'True
Width = 1095
End
Begin VB.CommandButton Command1
Default = -1 'True
Height = 435
Index = 0
Left = 30
MaskColor = &H00FFFFFF&
Picture = "frm_yhgz.frx":84BA
Style = 1 'Graphical
TabIndex = 2
Top = 30
UseMaskColor = -1 'True
Width = 1095
End
End
Begin VB.TextBox Text1
Height = 270
Index = 3
Left = 1425
MaxLength = 5
TabIndex = 12
Top = 2265
Width = 3210
End
Begin VB.TextBox Text1
Height = 270
Index = 2
Left = 1425
MaxLength = 5
TabIndex = 11
Top = 1735
Width = 3210
End
Begin VB.TextBox Text1
Height = 270
Index = 1
Left = 1410
MaxLength = 5
TabIndex = 10
Top = 1205
Width = 3210
End
Begin VB.TextBox Text1
Height = 270
Index = 0
Left = 1410
MaxLength = 5
TabIndex = 9
Top = 675
Width = 3210
End
Begin MSComctlLib.ListView ListView1
Height = 2250
Left = 285
TabIndex = 13
Top = 2670
Width = 5745
_ExtentX = 10134
_ExtentY = 3969
View = 3
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = 0 'False
AllowReorder = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
HotTracking = -1 'True
HoverSelection = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
NumItems = 4
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Text = "优惠时间"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 1
Text = "优惠方式"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 2
Text = "优惠项目"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 2
SubItemIndex = 3
Text = "次数/折扣"
Object.Width = 2540
EndProperty
End
Begin TabDlg.SSTab SSTab1
Height = 4995
Left = 135
TabIndex = 0
Top = 90
Width = 6060
_ExtentX = 10689
_ExtentY = 8811
_Version = 393216
Style = 1
Tabs = 2
TabHeight = 706
TabCaption(0) = "包月优惠"
TabPicture(0) = "frm_yhgz.frx":9470
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "Label1(4)"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "Label1(5)"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "Label1(6)"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).Control(3)= "Label1(7)"
Tab(0).Control(3).Enabled= 0 'False
Tab(0).ControlCount= 4
TabCaption(1) = "包年优惠"
TabPicture(1) = "frm_yhgz.frx":948C
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Label1(3)"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).Control(1)= "Label1(2)"
Tab(1).Control(1).Enabled= 0 'False
Tab(1).Control(2)= "Label1(1)"
Tab(1).Control(2).Enabled= 0 'False
Tab(1).Control(3)= "Label1(0)"
Tab(1).Control(3).Enabled= 0 'False
Tab(1).ControlCount= 4
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "次数/折扣："
Height = 180
Index = 3
Left = -74895
TabIndex = 21
Top = 2265
Width = 990
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "优惠时间："
Height = 180
Index = 2
Left = -74805
TabIndex = 20
Top = 630
Width = 900
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "优惠方式："
Height = 180
Index = 1
Left = -74805
TabIndex = 19
Top = 1175
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -