📄 frm_kc.frm
字号:
VERSION 5.00
Object = "{F0D2F211-CCB0-11D0-A316-00AA00688B10}#1.0#0"; "MSDATLST.OCX"
Object = "{0ECD9B60-23AA-11D0-B351-00A0C9055D8E}#6.0#0"; "MSHFLXGD.OCX"
Begin VB.Form frm_kc
Caption = "库存"
ClientHeight = 7305
ClientLeft = 60
ClientTop = 345
ClientWidth = 11295
Icon = "frm_kc.frx":0000
LinkTopic = "Form1"
MDIChild = -1 'True
ScaleHeight = 7305
ScaleWidth = 11295
WindowState = 2 'Maximized
Begin VB.CheckBox Check2
Caption = "显示全部物品"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 270
Left = 8280
TabIndex = 24
Top = 3240
Width = 2520
End
Begin VB.CommandButton Command2
Caption = "零库存删除"
Height = 300
Left = 9720
TabIndex = 21
Top = 3600
Width = 1065
End
Begin MSHierarchicalFlexGridLib.MSHFlexGrid grid_kc
Height = 6555
Left = 225
TabIndex = 20
Top = 180
Width = 7815
_ExtentX = 13785
_ExtentY = 11562
_Version = 393216
FixedCols = 0
FocusRect = 0
SelectionMode = 1
AllowUserResizing= 3
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_NumberOfBands = 1
_Band(0).Cols = 2
End
Begin VB.Frame Frame2
Caption = "选择物品"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2250
Left = 8175
TabIndex = 6
Top = 375
Width = 2610
Begin VB.OptionButton Option3
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 = 180
TabIndex = 13
Top = 345
Width = 780
End
Begin VB.OptionButton Option3
Caption = "编码"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Index = 2
Left = 180
TabIndex = 12
Top = 1065
Width = 780
End
Begin VB.OptionButton Option3
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 = 180
TabIndex = 11
Top = 675
Width = 720
End
Begin VB.OptionButton Option3
Caption = "品名"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Index = 3
Left = 180
TabIndex = 10
Top = 1395
Width = 810
End
Begin VB.TextBox text_code
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 990
TabIndex = 9
Top = 1740
Width = 1275
End
Begin VB.TextBox txt_name
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 990
TabIndex = 8
Top = 1335
Width = 1320
End
Begin VB.TextBox txt_code
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 990
TabIndex = 7
Top = 975
Width = 1290
End
Begin MSDataListLib.DataCombo datcmb_type
Bindings = "frm_kc.frx":08CA
Height = 330
Left = 990
TabIndex = 14
Top = 615
Width = 1275
_ExtentX = 2249
_ExtentY = 582
_Version = 393216
ListField = "type_name"
BoundColumn = "type_id"
Text = ""
Object.DataMember = "ComProType"
End
Begin VB.Label Label1
AutoSize = -1 'True
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 = 240
TabIndex = 15
Top = 1785
Width = 780
End
End
Begin VB.CheckBox Check1
Caption = "显示零库存物品"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 270
Left = 8280
TabIndex = 5
Top = 2760
Width = 2520
End
Begin VB.Frame Frame3
BackColor = &H80000001&
BorderStyle = 0 'None
Height = 1350
Left = 8160
TabIndex = 0
Top = 3960
Width = 2685
Begin VB.CommandButton Command1
Cancel = -1 'True
Caption = "退出(&X)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 420
Index = 0
Left = 1440
TabIndex = 4
Top = 750
Width = 1065
End
Begin VB.CommandButton comsql
Caption = "刷新(&R)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 420
Left = 195
TabIndex = 3
Top = 150
Width = 1065
End
Begin VB.CommandButton Command1
Caption = "打印(&P)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 420
Index = 1
Left = 1440
TabIndex = 2
Top = 150
Width = 1065
End
Begin VB.CommandButton Command1
Caption = "导出(&O)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 420
Index = 2
Left = 195
TabIndex = 1
Top = 765
Width = 1065
End
End
Begin VB.Label Label5
BorderStyle = 1 'Fixed Single
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
Left = 9360
TabIndex = 23
Top = 6405
Width = 1500
End
Begin VB.Label Label2
AutoSize = -1 'True
Caption = "合计总额："
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Index = 2
Left = 8205
TabIndex = 22
Top = 6480
Width = 1050
End
Begin VB.Label Label2
AutoSize = -1 'True
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 = 8205
TabIndex = 19
Top = 6000
Width = 1050
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -