📄 frmjycw.frm
字号:
Height = 1035
Left = 60
TabIndex = 63
Top = 240
Width = 8475
Begin VB.CommandButton cmdfind_hyfx
Appearance = 0 'Flat
Height = 450
Left = 5940
Picture = "frmjycw.frx":2CBAA
Style = 1 'Graphical
TabIndex = 66
Top = 360
Width = 1455
End
Begin VB.TextBox txthyfx_s
Height = 315
Left = 2160
TabIndex = 65
Top = 420
Width = 1575
End
Begin VB.TextBox txthyfx_e
Height = 315
Left = 4140
TabIndex = 64
Top = 420
Width = 1575
End
Begin VB.Label Label7
BackStyle = 0 'Transparent
Caption = "和"
Height = 255
Left = 3840
TabIndex = 68
Top = 480
Width = 255
End
Begin VB.Label Label8
BackStyle = 0 'Transparent
Caption = "会员号码介于"
Height = 255
Left = 960
TabIndex = 67
Top = 480
Width = 1155
End
Begin VB.Shape Shape8
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 840
Top = 420
Width = 1275
End
Begin VB.Shape Shape7
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 3780
Top = 420
Width = 315
End
End
Begin VB.Frame Frame6
BackColor = &H00A56E3A&
Caption = "查询结果"
Height = 4755
Left = 60
TabIndex = 61
Top = 1320
Width = 8475
Begin MSFlexGridLib.MSFlexGrid fgdhyfx
Height = 4455
Left = 60
TabIndex = 62
Top = 240
Width = 8355
_ExtentX = 14737
_ExtentY = 7858
_Version = 393216
FixedCols = 0
SelectionMode = 1
End
End
Begin VB.CommandButton cmdExit_hyfx
Appearance = 0 'Flat
Height = 450
Left = 4545
Picture = "frmjycw.frx":2D363
Style = 1 'Graphical
TabIndex = 60
Top = 6240
Width = 1455
End
Begin VB.CommandButton cmdPrinthyfx
Appearance = 0 'Flat
Height = 450
Left = 2535
Picture = "frmjycw.frx":2DB27
Style = 1 'Graphical
TabIndex = 59
Top = 6240
Width = 1455
End
End
Begin VB.Frame famlrjs
BackColor = &H00A56E3A&
Caption = "利润计算"
Height = 6915
Left = 3000
TabIndex = 36
Top = 120
Width = 8595
Begin VB.CommandButton cmdPrintlrjs
Appearance = 0 'Flat
Height = 450
Left = 2535
Picture = "frmjycw.frx":2E2BF
Style = 1 'Graphical
TabIndex = 57
Top = 6240
Visible = 0 'False
Width = 1455
End
Begin VB.CommandButton cmdExit_lrjs
Appearance = 0 'Flat
Height = 450
Left = 4260
Picture = "frmjycw.frx":2EA57
Style = 1 'Graphical
TabIndex = 56
Top = 6240
Width = 1455
End
Begin VB.Frame Frame12
BackColor = &H00A56E3A&
Height = 1035
Left = 60
TabIndex = 37
Top = 240
Width = 8475
Begin VB.CommandButton cmdFind_lrjs
Appearance = 0 'Flat
Height = 450
Left = 5940
Picture = "frmjycw.frx":2F21B
Style = 1 'Graphical
TabIndex = 39
Top = 360
Width = 1455
End
Begin MSComCtl2.DTPicker dtplrjs_s
Height = 315
Left = 2160
TabIndex = 38
Top = 420
Width = 1575
_ExtentX = 2778
_ExtentY = 556
_Version = 393216
Format = 24641537
CurrentDate = 37458
End
Begin MSComCtl2.DTPicker dtplrjs_e
Height = 315
Left = 4140
TabIndex = 40
Top = 420
Width = 1575
_ExtentX = 2778
_ExtentY = 556
_Version = 393216
Format = 24641537
CurrentDate = 37458
End
Begin VB.Label Label11
BackStyle = 0 'Transparent
Caption = "选择日期介于"
Height = 255
Left = 960
TabIndex = 42
Top = 480
Width = 1155
End
Begin VB.Label Label12
BackStyle = 0 'Transparent
Caption = "和"
Height = 255
Left = 3840
TabIndex = 41
Top = 480
Width = 255
End
Begin VB.Shape Shape11
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 840
Top = 420
Width = 1275
End
Begin VB.Shape Shape12
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 3780
Top = 420
Width = 315
End
End
Begin VB.Frame Frame11
BackColor = &H00A56E3A&
Caption = "查询结果"
Height = 4695
Left = 60
TabIndex = 43
Top = 1320
Width = 8475
Begin VB.TextBox txtzmsr
Alignment = 1 'Right Justify
Appearance = 0 'Flat
Enabled = 0 'False
Height = 315
Left = 2340
TabIndex = 47
Top = 360
Width = 2775
End
Begin VB.TextBox txtzmcb
Alignment = 1 'Right Justify
Appearance = 0 'Flat
Enabled = 0 'False
Height = 315
Left = 2340
TabIndex = 46
Top = 900
Width = 2775
End
Begin VB.TextBox txtzmlr
Alignment = 1 'Right Justify
Appearance = 0 'Flat
Enabled = 0 'False
Height = 315
Left = 2340
TabIndex = 45
Top = 1440
Width = 2775
End
Begin VB.TextBox txtzmll
Alignment = 1 'Right Justify
Appearance = 0 'Flat
Enabled = 0 'False
Height = 315
Left = 2340
TabIndex = 44
Top = 1980
Width = 2775
End
Begin VB.Label Label13
BackStyle = 0 'Transparent
Caption = "营业收入："
Height = 255
Left = 1320
TabIndex = 55
Top = 420
Width = 975
End
Begin VB.Label Label14
BackStyle = 0 'Transparent
Caption = "原料成本："
Height = 255
Left = 1320
TabIndex = 54
Top = 960
Width = 975
End
Begin VB.Label Label15
BackStyle = 0 'Transparent
Caption = "毛 利 润："
Height = 255
Left = 1320
TabIndex = 53
Top = 1500
Width = 975
End
Begin VB.Label Label16
BackStyle = 0 'Transparent
Caption = "毛 利 率："
Height = 255
Left = 1320
TabIndex = 52
Top = 2040
Width = 975
End
Begin VB.Label Label17
BackStyle = 0 'Transparent
Caption = "RMB"
Height = 255
Left = 5220
TabIndex = 51
Top = 420
Width = 495
End
Begin VB.Label Label18
BackStyle = 0 'Transparent
Caption = "RMB"
Height = 255
Left = 5220
TabIndex = 50
Top = 960
Width = 495
End
Begin VB.Label Label19
BackStyle = 0 'Transparent
Caption = "RMB"
Height = 255
Left = 5220
TabIndex = 49
Top = 1500
Width = 495
End
Begin VB.Label Label20
BackStyle = 0 'Transparent
Caption = "%"
Height = 255
Left = 5340
TabIndex = 48
Top = 2040
Width = 495
End
Begin VB.Shape Shape13
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 960
Top = 360
Width = 1275
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -