📄 form2.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx"
Object = "{9A226D6F-2658-4445-8D35-5C19D42676FE}#1.0#0"; "xp.ocx"
Begin VB.Form Form2
BackColor = &H00E7F7FF&
Caption = "会员消费"
ClientHeight = 9405
ClientLeft = 60
ClientTop = 345
ClientWidth = 15240
ControlBox = 0 'False
DrawMode = 15 'Merge Pen Not
LinkTopic = "Form2"
MDIChild = -1 'True
ScaleHeight = 9405
ScaleWidth = 15240
WindowState = 2 'Maximized
Begin 会员管理系统.XPM XPM1
Left = 3300
Top = 6120
_ExtentX = 450
_ExtentY = 344
End
Begin MSComctlLib.ListView ListView2
Height = 5835
Left = 9660
TabIndex = 49
Top = 3060
Width = 5655
_ExtentX = 9975
_ExtentY = 10292
View = 3
LabelWrap = -1 'True
HideSelection = -1 'True
AllowReorder = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483643
Appearance = 1
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 = 1764
EndProperty
BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 2
Text = "数量"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 3
Text = "合计金额"
Object.Width = 1764
EndProperty
End
Begin VB.CommandButton Command9
Caption = "会员查询"
Height = 435
Left = 360
TabIndex = 30
Top = 1680
Width = 1335
End
Begin VB.CommandButton Command8
Caption = "会员消费"
Height = 435
Left = 360
TabIndex = 29
Top = 840
Width = 1335
End
Begin MSComctlLib.ListView ListView1
Height = 5835
Left = 1935
TabIndex = 28
Top = 3060
Width = 7755
_ExtentX = 13679
_ExtentY = 10292
View = 3
Arrange = 1
LabelEdit = 1
Sorted = -1 'True
LabelWrap = -1 'True
HideSelection = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483643
Appearance = 1
NumItems = 0
End
Begin VB.CommandButton Command7
Caption = "查看备注"
Height = 375
Left = 8280
TabIndex = 27
Top = 2640
Width = 1215
End
Begin VB.CommandButton Command6
Caption = "兑换商品(&X)"
Height = 375
Left = 6240
TabIndex = 26
Top = 2640
Width = 1215
End
Begin VB.CommandButton Command5
Caption = "增加消费(&C)"
Default = -1 'True
Height = 375
Left = 4260
TabIndex = 25
Top = 2640
Width = 1215
End
Begin BSE_Engine.BSE BSE1
Left = 12240
Top = 120
_ExtentX = 6588
_ExtentY = 1085
End
Begin VB.CommandButton Command4
Caption = "清除会员信息"
Height = 375
Left = 10620
TabIndex = 5
Top = 240
Width = 1335
End
Begin VB.CommandButton Command3
Caption = "添加会员(&R)"
Height = 375
Left = 8940
TabIndex = 4
Top = 240
Width = 1395
End
Begin VB.CommandButton Command2
Caption = "浏览(&W)"
Height = 375
Left = 7440
TabIndex = 3
Top = 240
Width = 1155
End
Begin VB.CommandButton Command1
Caption = "查询(&Q)"
Height = 375
Left = 6060
TabIndex = 2
Top = 240
Width = 1155
End
Begin VB.TextBox Text1
Height = 315
Left = 3900
TabIndex = 1
ToolTipText = "请输入会员卡号"
Top = 300
Width = 1875
End
Begin VB.Frame Frame1
BackColor = &H8000000B&
Height = 555
Left = 1920
TabIndex = 50
Top = 8820
Width = 7755
Begin VB.Label Label39
AutoSize = -1 'True
BackStyle = 0 'Transparent
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 180
Left = 240
TabIndex = 52
Top = 240
Width = 105
End
End
Begin VB.Frame Frame2
Height = 555
Left = 9600
TabIndex = 51
Top = 8820
Width = 5715
End
Begin VB.Image Im1
Height = 240
Left = 120
Picture = "Form2.frx":0000
Top = 6420
Visible = 0 'False
Width = 240
End
Begin VB.Image Im4
Height = 240
Left = 1380
Picture = "Form2.frx":058A
Top = 6420
Visible = 0 'False
Width = 240
End
Begin VB.Image Im2
Height = 240
Left = 540
Picture = "Form2.frx":0B14
Top = 6420
Visible = 0 'False
Width = 240
End
Begin VB.Image Im3
Height = 240
Left = 900
Picture = "Form2.frx":0C5E
Top = 6420
Visible = 0 'False
Width = 240
End
Begin VB.Label Label41
Caption = "Label41"
Height = 255
Left = 420
TabIndex = 54
Top = 8400
Visible = 0 'False
Width = 915
End
Begin VB.Label Label40
Caption = "Label40"
Height = 195
Left = 420
TabIndex = 53
Top = 8040
Visible = 0 'False
Width = 795
End
Begin VB.Label Label38
AutoSize = -1 'True
BackStyle = 0 'Transparent
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 180
Left = 12660
TabIndex = 48
Top = 1680
Width = 105
End
Begin VB.Label Label37
AutoSize = -1 'True
BackStyle = 0 'Transparent
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 180
Left = 3180
TabIndex = 47
Top = 2280
Width = 105
End
Begin VB.Label Label36
AutoSize = -1 'True
BackStyle = 0 'Transparent
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 180
Left = 3180
TabIndex = 46
Top = 1980
Width = 105
End
Begin VB.Label Label35
AutoSize = -1 'True
BackStyle = 0 'Transparent
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 180
Left = 3180
TabIndex = 45
Top = 1680
Width = 105
End
Begin VB.Label Label34
AutoSize = -1 'True
BackStyle = 0 'Transparent
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 180
Left = 3180
TabIndex = 44
Top = 1260
Width = 105
End
Begin VB.Label Label33
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -