📄 frmjycw.frm
字号:
Begin VB.Frame famsj_jyfx
BackColor = &H00A56E3A&
Height = 1035
Left = 60
TabIndex = 85
Top = 240
Width = 8475
Begin VB.ComboBox Combo1
Height = 300
Left = 735
TabIndex = 184
Text = "Combo1"
Top = 615
Width = 1380
End
Begin VB.CommandButton cmdfind_srfx
Appearance = 0 'Flat
Height = 450
Left = 5895
Picture = "frmjycw.frx":2ACDC
Style = 1 'Graphical
TabIndex = 86
Top = 195
Width = 1455
End
Begin MSComCtl2.DTPicker dtpsrfx_s
Height = 315
Left = 2025
TabIndex = 87
Top = 225
Width = 1575
_ExtentX = 2778
_ExtentY = 556
_Version = 393216
Format = 24641537
CurrentDate = 37455
End
Begin MSComCtl2.DTPicker dtpsrfx_e
Height = 315
Left = 4005
TabIndex = 88
Top = 225
Width = 1575
_ExtentX = 2778
_ExtentY = 556
_Version = 393216
Format = 24641537
CurrentDate = 37455
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "选择日期介于"
Height = 255
Left = 825
TabIndex = 90
Top = 285
Width = 1155
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "和"
Height = 255
Left = 3705
TabIndex = 89
Top = 285
Width = 255
End
Begin VB.Shape Shape1
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 705
Top = 225
Width = 1275
End
Begin VB.Shape Shape2
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 3645
Top = 225
Width = 315
End
End
Begin VB.Frame famfgd_srfx
BackColor = &H00A56E3A&
Caption = "查询结果"
Height = 4755
Left = 60
TabIndex = 83
Top = 1320
Width = 8475
Begin MSFlexGridLib.MSFlexGrid fgdsrfx
Height = 3795
Left = 60
TabIndex = 84
Top = 240
Width = 8355
_ExtentX = 14737
_ExtentY = 6694
_Version = 393216
FixedCols = 0
SelectionMode = 1
End
Begin VB.Label Label34
BackStyle = 0 'Transparent
Caption = "RMB"
Height = 255
Left = 5520
TabIndex = 169
Top = 4260
Width = 435
End
Begin VB.Label lblsjje
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "0.00"
Height = 255
Left = 3060
TabIndex = 168
Top = 4260
Width = 2235
End
Begin VB.Label Label33
BackStyle = 0 'Transparent
Caption = "实际收费总金额"
Height = 255
Left = 1620
TabIndex = 167
Top = 4260
Width = 1335
End
Begin VB.Shape Shape33
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 1560
Top = 4200
Width = 1395
End
Begin VB.Shape Shape34
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 3000
Top = 4200
Width = 2355
End
Begin VB.Shape Shape35
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 5400
Top = 4200
Width = 555
End
End
End
Begin VB.Frame famcbxh
BackColor = &H00A56E3A&
Caption = "成本消耗"
Height = 6915
Left = 3000
TabIndex = 69
Top = 120
Width = 8595
Begin VB.CommandButton cmdPrintcbxh
Appearance = 0 'Flat
Height = 450
Left = 2535
Picture = "frmjycw.frx":2B495
Style = 1 'Graphical
TabIndex = 79
Top = 6240
Width = 1455
End
Begin VB.CommandButton cmdExit_cbxh
Appearance = 0 'Flat
Height = 450
Left = 4545
Picture = "frmjycw.frx":2BC2D
Style = 1 'Graphical
TabIndex = 78
Top = 6240
Width = 1455
End
Begin VB.Frame Frame9
BackColor = &H00A56E3A&
Caption = "查询结果"
Height = 4755
Left = 60
TabIndex = 76
Top = 1320
Width = 8475
Begin VB.TextBox txtcbzje
Alignment = 1 'Right Justify
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Height = 315
Left = 3300
TabIndex = 176
Top = 4260
Width = 2055
End
Begin MSFlexGridLib.MSFlexGrid fgdcbxh
Height = 3915
Left = 60
TabIndex = 77
Top = 240
Width = 8355
_ExtentX = 14737
_ExtentY = 6906
_Version = 393216
FixedCols = 0
SelectionMode = 1
End
Begin VB.Label Label37
BackStyle = 0 'Transparent
Caption = "RMB"
Height = 255
Left = 5460
TabIndex = 177
Top = 4320
Width = 375
End
Begin VB.Label Label36
BackStyle = 0 'Transparent
Caption = "成本总金额"
Height = 255
Left = 2220
TabIndex = 175
Top = 4320
Width = 1035
End
Begin VB.Shape Shape37
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 2100
Top = 4260
Width = 1155
End
Begin VB.Shape Shape38
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 5400
Top = 4260
Width = 495
End
End
Begin VB.Frame Frame8
BackColor = &H00A56E3A&
Height = 1035
Left = 60
TabIndex = 70
Top = 240
Width = 8475
Begin VB.CommandButton cmdfind_cbxh
Appearance = 0 'Flat
Height = 450
Left = 5940
Picture = "frmjycw.frx":2C3F1
Style = 1 'Graphical
TabIndex = 71
Top = 360
Width = 1455
End
Begin MSComCtl2.DTPicker dtpcbxh_s
Height = 315
Left = 2160
TabIndex = 72
Top = 420
Width = 1575
_ExtentX = 2778
_ExtentY = 556
_Version = 393216
Format = 24641537
CurrentDate = 37455
End
Begin MSComCtl2.DTPicker dtpcbxh_e
Height = 315
Left = 4140
TabIndex = 73
Top = 420
Width = 1575
_ExtentX = 2778
_ExtentY = 556
_Version = 393216
Format = 24641537
CurrentDate = 37455
End
Begin VB.Label Label10
BackStyle = 0 'Transparent
Caption = "选择日期介于"
Height = 255
Left = 960
TabIndex = 75
Top = 480
Width = 1155
End
Begin VB.Label Label9
BackStyle = 0 'Transparent
Caption = "和"
Height = 255
Left = 3840
TabIndex = 74
Top = 480
Width = 255
End
Begin VB.Shape Shape9
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 840
Top = 420
Width = 1275
End
Begin VB.Shape Shape10
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 3780
Top = 420
Width = 315
End
End
End
Begin VB.Frame famhyfx
BackColor = &H00A56E3A&
Caption = "会员分析"
Height = 6915
Left = 3000
TabIndex = 58
Top = 120
Width = 8595
Begin VB.Frame Frame7
BackColor = &H00A56E3A&
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -