📄 frmcgkc.frm
字号:
Appearance = 0 'Flat
BeginProperty DataFormat
Type = 1
Format = """￥""#,##0.00"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 2052
SubFormatType = 2
EndProperty
Height = 285
Left = 4860
TabIndex = 23
Text = "0"
Top = 720
Width = 855
End
Begin VB.TextBox txtbzyj
Alignment = 1 'Right Justify
Appearance = 0 'Flat
BeginProperty DataFormat
Type = 1
Format = """￥""#,##0.00"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 2052
SubFormatType = 2
EndProperty
Height = 285
Left = 6960
TabIndex = 22
Text = "0"
Top = 720
Width = 855
End
Begin VB.Label Label35
BackStyle = 0 'Transparent
Caption = "天"
Height = 195
Left = 5760
TabIndex = 36
Top = 780
Width = 315
End
Begin VB.Label Label36
BackStyle = 0 'Transparent
Caption = "天"
Height = 195
Left = 7860
TabIndex = 35
Top = 780
Width = 315
End
Begin VB.Label Label37
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "保质预警："
Height = 255
Left = 6000
TabIndex = 34
Top = 780
Width = 975
End
Begin VB.Label Label34
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "保质期："
Height = 255
Left = 4140
TabIndex = 33
Top = 780
Width = 735
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "原料名称："
Height = 255
Left = 3180
TabIndex = 32
Top = 360
Width = 975
End
Begin VB.Label Label3
BackStyle = 0 'Transparent
Caption = "采购价格："
Height = 255
Left = 2160
TabIndex = 31
Top = 780
Width = 975
End
Begin VB.Label lblylbm
BackStyle = 0 'Transparent
Caption = "原料编码："
Height = 255
Left = 120
TabIndex = 30
Top = 360
Width = 1035
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "单 位："
Height = 255
Left = 120
TabIndex = 29
Top = 780
Width = 975
End
Begin VB.Shape Shape30
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 60
Top = 300
Width = 915
End
Begin VB.Shape Shape33
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 3120
Top = 300
Width = 915
End
Begin VB.Shape Shape22
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 60
Top = 720
Width = 915
End
Begin VB.Shape Shape34
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 2100
Top = 720
Width = 915
End
Begin VB.Shape Shape32
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 4080
Top = 720
Width = 735
End
Begin VB.Shape Shape31
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 6000
Top = 720
Width = 915
End
End
Begin VB.Frame fdmylmc_fgd
BackColor = &H00A56E3A&
Height = 4515
Left = 120
TabIndex = 19
Top = 1440
Width = 8535
Begin MSFlexGridLib.MSFlexGrid fgdylmc
Height = 4215
Left = 120
TabIndex = 20
Top = 180
Width = 8295
_ExtentX = 14631
_ExtentY = 7435
_Version = 393216
Cols = 6
FixedCols = 0
BackColorSel = 16711680
AllowBigSelection= 0 'False
TextStyleFixed = 4
GridLines = 2
SelectionMode = 1
End
End
Begin VB.CommandButton cmdExit_ylmc
Appearance = 0 'Flat
Height = 450
Left = 5580
Picture = "frmcgkc.frx":2D3DC
Style = 1 'Graphical
TabIndex = 18
Top = 6180
Width = 1455
End
Begin VB.CommandButton cmdDel_ylmc
Appearance = 0 'Flat
Height = 450
Left = 2580
Picture = "frmcgkc.frx":2DBA0
Style = 1 'Graphical
TabIndex = 17
Top = 6180
Width = 1455
End
Begin VB.CommandButton cmdSave_ylmc
Appearance = 0 'Flat
Height = 450
Left = 4080
Picture = "frmcgkc.frx":2E3A2
Style = 1 'Graphical
TabIndex = 16
Top = 6180
Width = 1455
End
Begin VB.CommandButton cmdAdd_ylmc
Appearance = 0 'Flat
Height = 450
Left = 1080
Picture = "frmcgkc.frx":2EB52
Style = 1 'Graphical
TabIndex = 15
Top = 6180
Width = 1455
End
End
Begin VB.Frame famdjcx
BackColor = &H00A56E3A&
Caption = "单据查询"
Height = 6915
Left = 2760
TabIndex = 136
Top = 120
Width = 8775
Begin VB.Frame famdjcx_child2
BackColor = &H00A56E3A&
Caption = "结果显示"
Height = 5235
Left = 60
TabIndex = 137
Top = 1560
Width = 8655
Begin MSFlexGridLib.MSFlexGrid fgdcgdcx
Height = 1995
Left = 120
TabIndex = 138
Top = 600
Width = 8415
_ExtentX = 14843
_ExtentY = 3519
_Version = 393216
FixedCols = 0
SelectionMode = 1
End
Begin MSFlexGridLib.MSFlexGrid fgdckdcx
Height = 2115
Left = 120
TabIndex = 139
Top = 3000
Width = 8415
_ExtentX = 14843
_ExtentY = 3731
_Version = 393216
FixedCols = 0
SelectionMode = 1
End
Begin VB.Label Label43
BackStyle = 0 'Transparent
Caption = "采购单结果："
Height = 255
Left = 180
TabIndex = 141
Top = 300
Width = 1215
End
Begin VB.Label Label44
BackStyle = 0 'Transparent
Caption = "出库单结果："
Height = 255
Left = 180
TabIndex = 140
Top = 2700
Width = 1215
End
Begin VB.Shape Shape41
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 120
Top = 240
Width = 1155
End
Begin VB.Shape Shape42
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 120
Top = 2640
Width = 1155
End
End
Begin VB.Frame famdjcx_child1
BackColor = &H00A56E3A&
Height = 1335
Left = 60
TabIndex = 142
Top = 180
Width = 8655
Begin VB.CommandButton cmdPrintcgd
Appearance = 0 'Flat
Height = 450
Left = 2760
Picture = "frmcgkc.frx":2F34B
Style = 1 'Graphical
TabIndex = 146
Top = 720
Width = 1455
End
Begin VB.CommandButton cmdFind_djcx
Appearance = 0 'Flat
Height = 450
Left = 1320
Picture = "frmcgkc.frx":2FC8D
Style = 1 'Graphical
TabIndex = 145
Top = 720
Width = 1455
End
Begin VB.CommandButton cmdPrintckd
Appearance = 0 'Flat
Height = 450
Left = 4200
Picture = "frmcgkc.frx":30446
Style = 1 'Graphical
TabIndex = 144
Top = ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -