📄 cg_sh_th_tj.frm
字号:
VERSION 5.00
Object = "{A964BDA3-3E93-11CF-9A0F-9E6261DACD1C}#3.0#0"; "Resize32.ocx"
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{0D6234D1-DBA2-11D1-B5DF-0060976089D0}#6.0#0"; "TODG6.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Begin VB.Form cG_sH_tH_tj
BorderStyle = 1 'Fixed Single
Caption = "收货情况统计"
ClientHeight = 6735
ClientLeft = 1635
ClientTop = 1485
ClientWidth = 10215
Icon = "cG_sH_tH_tj.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
Moveable = 0 'False
ScaleHeight = 6735
ScaleWidth = 10215
Begin TabDlg.SSTab SSTab1
Height = 6735
Left = 0
TabIndex = 0
Top = 0
Width = 10215
_ExtentX = 18018
_ExtentY = 11880
_Version = 393216
Style = 1
Tabs = 2
TabHeight = 520
TabMaxWidth = 2
BackColor = 12632256
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
TabCaption(0) = "按供应商查询"
TabPicture(0) = "cG_sH_tH_tj.frx":030A
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "Frame3(0)"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "Adodc_body_general"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "Adoprimaryrs"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).Control(3)= "TDBGrid1(0)"
Tab(0).Control(3).Enabled= 0 'False
Tab(0).Control(4)= "ReSize1"
Tab(0).Control(4).Enabled= 0 'False
Tab(0).ControlCount= 5
TabCaption(1) = "按物料查询"
TabPicture(1) = "cG_sH_tH_tj.frx":0326
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "TDBGrid1(1)"
Tab(1).Control(1)= "Frame3(1)"
Tab(1).ControlCount= 2
Begin ResizeLibCtl.ReSize ReSize1
Left = 2970
Top = 90
_Version = 196608
_ExtentX = 741
_ExtentY = 741
_StockProps = 64
Enabled = -1 'True
Enabled = -1 'True
FormMinWidth = 0
FormMinHeight = 0
FormDesignHeight= 6735
FormDesignWidth = 10215
End
Begin TrueOleDBGrid60.TDBGrid TDBGrid1
Bindings = "cG_sH_tH_tj.frx":0342
Height = 4995
Index = 0
Left = 120
OleObjectBlob = "cG_sH_tH_tj.frx":035D
TabIndex = 13
Top = 510
Width = 9975
End
Begin MSAdodcLib.Adodc Adoprimaryrs
Height = 330
Left = 4320
Top = 3660
Width = 3495
_ExtentX = 6165
_ExtentY = 582
ConnectMode = 0
CursorLocation = 3
IsolationLevel = -1
ConnectionTimeout= 15
CommandTimeout = 30
CursorType = 3
LockType = 3
CommandType = 8
CursorOptions = 0
CacheSize = 50
MaxRecords = 0
BOFAction = 0
EOFAction = 0
ConnectStringType= 1
Appearance = 1
BackColor = -2147483643
ForeColor = -2147483640
Orientation = 0
Enabled = -1
Connect = ""
OLEDBString = ""
OLEDBFile = ""
DataSourceName = ""
OtherAttributes = ""
UserName = ""
Password = ""
RecordSource = ""
Caption = "Adoprimaryrs"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_Version = 393216
End
Begin MSAdodcLib.Adodc Adodc_body_general
Height = 375
Left = 4320
Top = 2940
Visible = 0 'False
Width = 3855
_ExtentX = 6800
_ExtentY = 661
ConnectMode = 0
CursorLocation = 3
IsolationLevel = -1
ConnectionTimeout= 15
CommandTimeout = 30
CursorType = 3
LockType = 3
CommandType = 8
CursorOptions = 0
CacheSize = 50
MaxRecords = 0
BOFAction = 0
EOFAction = 0
ConnectStringType= 1
Appearance = 1
BackColor = -2147483643
ForeColor = -2147483640
Orientation = 0
Enabled = -1
Connect = ""
OLEDBString = ""
OLEDBFile = ""
DataSourceName = ""
OtherAttributes = ""
UserName = ""
Password = ""
RecordSource = ""
Caption = "Adodc_body_general"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_Version = 393216
End
Begin VB.Frame Frame3
Height = 1065
Index = 0
Left = 90
TabIndex = 1
Top = 5520
Width = 10005
Begin VB.CommandButton Command2
Caption = "综合统计"
Height = 615
Left = 7920
Picture = "cG_sH_tH_tj.frx":98A3
Style = 1 'Graphical
TabIndex = 29
Top = 300
Width = 885
End
Begin VB.CommandButton Command6
Caption = "采购未回"
Height = 615
Left = 6960
Picture = "cG_sH_tH_tj.frx":9E75
Style = 1 'Graphical
TabIndex = 26
Top = 300
Width = 885
End
Begin VB.TextBox Text1
BeginProperty Font
Name = "宋体"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 285
Index = 0
Left = 1200
TabIndex = 18
Top = 270
Width = 1065
End
Begin VB.CommandButton cmd_exit
Caption = "退出"
Height = 615
Index = 0
Left = 9120
Picture = "cG_sH_tH_tj.frx":A447
Style = 1 'Graphical
TabIndex = 17
Top = 300
Width = 705
End
Begin VB.CommandButton Command3
Caption = "退货明细"
Height = 615
Left = 6120
Picture = "cG_sH_tH_tj.frx":A6CA
Style = 1 'Graphical
TabIndex = 16
Top = 300
Width = 855
End
Begin VB.CommandButton Cmd_sh_dy
Caption = "收货明细"
Height = 615
Left = 4320
Picture = "cG_sH_tH_tj.frx":A800
Style = 1 'Graphical
TabIndex = 15
Top = 300
Width = 885
End
Begin VB.CommandButton Command1
Caption = "入库明细"
Height = 615
Left = 5280
Picture = "cG_sH_tH_tj.frx":ADD2
Style = 1 'Graphical
TabIndex = 14
Top = 300
Width = 855
End
Begin VB.TextBox Text1
BeginProperty Font
Name = "宋体"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 285
Index = 1
Left = 2340
TabIndex = 4
Top = 270
Width = 1755
End
Begin MSComCtl2.DTPicker DTPicker2
Height = 255
Index = 0
Left = 2820
TabIndex = 2
Top = 630
Width = 1275
_ExtentX = 2249
_ExtentY = 450
_Version = 393216
Format = 178257921
CurrentDate = 37560
End
Begin MSComCtl2.DTPicker DTPicker1
Height = 255
Index = 0
Left = 1200
TabIndex = 3
Top = 630
Width = 1215
_ExtentX = 2143
_ExtentY = 450
_Version = 393216
Format = 178257921
CurrentDate = 37560
End
Begin VB.Label Label1
Caption = "供应商编号:"
BeginProperty Font
Name = "宋体"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 255
Index = 2
Left = 90
TabIndex = 7
Top = 270
Width = 1815
End
Begin VB.Label Label2
Caption = "⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -