📄 ct_zdjs.frm
字号:
VERSION 5.00
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Begin VB.Form ct_zdjs
BorderStyle = 3 'Fixed Dialog
ClientHeight = 5745
ClientLeft = -15
ClientTop = -15
ClientWidth = 7650
ControlBox = 0 'False
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 5745
ScaleWidth = 7650
ShowInTaskbar = 0 'False
StartUpPosition = 1 'CenterOwner
Begin VB.CommandButton CMD_JS
Caption = "结 算(F4)"
BeginProperty Font
Name = "黑体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 510
Left = 1680
TabIndex = 9
Top = 5130
Width = 1575
End
Begin VB.CommandButton CMD_EXIT
Caption = "退 出(Esc)"
BeginProperty Font
Name = "黑体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 510
Left = 4680
TabIndex = 10
Top = 5130
Width = 1575
End
Begin VB.Frame Frame1
Height = 5865
Left = 0
TabIndex = 11
Top = -90
Width = 7680
Begin VB.Frame Frame2
Height = 4425
Left = 150
TabIndex = 13
Top = 600
Width = 7365
Begin VB.Frame fm_yhq
Caption = "回收优惠券"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2325
Left = 3930
TabIndex = 22
Top = 1950
Width = 3225
Begin VB.Frame Frame4
Height = 120
Left = 30
TabIndex = 34
Top = 540
Width = 3165
End
Begin VB.Frame fm_yhqsl
BorderStyle = 0 'None
Height = 375
Left = 840
TabIndex = 30
Top = 870
Width = 2190
Begin VB.TextBox tx_yhqsl
BackColor = &H00FFFFFF&
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 990
MaxLength = 6
TabIndex = 31
Text = "Text1"
Top = 30
Width = 1005
End
Begin VB.Label Label3
Alignment = 1 'Right Justify
Caption = "收回张数"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 0
TabIndex = 32
Top = 60
Width = 855
End
End
Begin VB.OptionButton op_yhq
Caption = "否"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Index = 0
Left = 840
TabIndex = 7
Top = 330
Value = -1 'True
Width = 525
End
Begin VB.OptionButton op_yhq
Caption = "是"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Index = 1
Left = 2130
TabIndex = 8
Top = 330
Width = 525
End
End
Begin VB.TextBox tx_dfzh
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 5040
MaxLength = 5
TabIndex = 3
Text = "Text1"
Top = 810
Width = 765
End
Begin VB.Frame fm_zck
Caption = "回收免费早餐卡"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2325
Left = 180
TabIndex = 20
Top = 1950
Width = 3285
Begin VB.Frame Frame3
Height = 120
Left = 30
TabIndex = 33
Top = 570
Width = 3225
End
Begin VB.Frame fm_zckbz
BorderStyle = 0 'None
Enabled = 0 'False
Height = 1665
Left = 30
TabIndex = 24
Top = 570
Width = 3210
Begin VB.TextBox m_dfzh
Height = 300
Left = 840
MaxLength = 5
TabIndex = 28
Top = 180
Width = 795
End
Begin VB.TextBox tx_bz
Appearance = 0 'Flat
BackColor = &H00FFFFFF&
BorderStyle = 0 'None
Height = 210
Left = 1920
TabIndex = 26
Text = "Text1"
Top = 1080
Width = 885
End
Begin VB.TextBox tx_sl
Appearance = 0 'Flat
BackColor = &H00FFFFFF&
BorderStyle = 0 'None
Height = 210
Left = 1080
TabIndex = 25
Text = "Text1"
Top = 1050
Width = 825
End
Begin MSFlexGridLib.MSFlexGrid gd1
Height = 1050
Left = 90
TabIndex = 27
Top = 540
Width = 3045
_ExtentX = 5371
_ExtentY = 1852
_Version = 327680
Rows = 10
Cols = 6
FixedCols = 0
BackColor = 12648447
ScrollBars = 2
End
Begin VB.Label Label6
Alignment = 1 'Right Justify
Caption = "帐 号"
Height = 165
Left = 210
TabIndex = 29
Top = 240
Width = 555
End
End
Begin VB.OptionButton op_mfck
Caption = "是"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Index = 1
Left = 1950
TabIndex = 6
Top = 330
Width = 465
End
Begin VB.OptionButton op_mfck
Caption = "否"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Index = 0
Left = 690
TabIndex = 5
Top = 330
Value = -1 'True
Width = 495
End
End
Begin VB.TextBox tx_fkfs
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 1320
MaxLength = 1
TabIndex = 4
Text = "Text1"
Top = 1290
Width = 525
End
Begin VB.TextBox tx_jsfs
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 1320
MaxLength = 1
TabIndex = 2
Text = "Text1"
Top = 810
Width = 525
End
Begin VB.TextBox tx_zdh
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -