meetcarbalance.frm
来自「一个关于电脑管理汽车的软件」· FRM 代码 · 共 662 行 · 第 1/2 页
FRM
662 行
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "Mscomctl.ocx"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{40D97E01-4259-4398-B597-183C348B488F}#1.0#0"; "BSE.ocx"
Begin VB.Form MeetCarBalance
Caption = "维修单结算(未结算维修单)"
ClientHeight = 8610
ClientLeft = 60
ClientTop = 450
ClientWidth = 11520
LinkTopic = "Form1"
MDIChild = -1 'True
ScaleHeight = 8610
ScaleWidth = 11520
Begin VB.Frame frameInfo
Height = 855
Left = 0
TabIndex = 0
Top = 0
Width = 11775
Begin VB.CommandButton Command1
Height = 495
Index = 5
Left = 7200
Picture = "MeetCarBalance.frx":0000
Style = 1 'Graphical
TabIndex = 2
ToolTipText = "审核"
Top = 240
Width = 495
End
Begin VB.CommandButton Command1
Height = 495
Index = 0
Left = 4200
Picture = "MeetCarBalance.frx":014A
Style = 1 'Graphical
TabIndex = 1
ToolTipText = "搜索"
Top = 240
Width = 495
End
Begin VB.Label Label10
Caption = "维修单结算(未结算维修单)"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 120
TabIndex = 3
Top = 360
Width = 3135
End
End
Begin TabDlg.SSTab SSTab1
Height = 4215
Left = 0
TabIndex = 4
Top = 4320
Width = 10005
_ExtentX = 17648
_ExtentY = 7435
_Version = 393216
TabHeight = 520
TabMaxWidth = 2646
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
TabCaption(0) = "维修项目"
TabPicture(0) = "MeetCarBalance.frx":0294
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "Label1(0)"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "Label1(1)"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "Label1(2)"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).Control(3)= "Label2"
Tab(0).Control(3).Enabled= 0 'False
Tab(0).Control(4)= "lstBillDocu(0)"
Tab(0).Control(4).Enabled= 0 'False
Tab(0).ControlCount= 5
TabCaption(1) = "零件项目"
TabPicture(1) = "MeetCarBalance.frx":02B0
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "lstBillDocu(1)"
Tab(1).ControlCount= 1
TabCaption(2) = "其它项目"
TabPicture(2) = "MeetCarBalance.frx":02CC
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "lstBillDocu(2)"
Tab(2).ControlCount= 1
Begin MSComctlLib.ListView lstBillDocu
Height = 2895
Index = 0
Left = 120
TabIndex = 5
Top = 480
Width = 9255
_ExtentX = 16325
_ExtentY = 5106
View = 3
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = 0 'False
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = 8388608
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 10.5
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
NumItems = 4
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Text = "Name"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 1
Text = "Address"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 2
Text = "City, State, Zip"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 3
Text = "Notes"
Object.Width = 2540
EndProperty
End
Begin MSComctlLib.ListView lstBillDocu
Height = 3375
Index = 1
Left = -74760
TabIndex = 6
Top = 480
Width = 9255
_ExtentX = 16325
_ExtentY = 5953
View = 3
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = 0 'False
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = 8388608
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 10.5
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
NumItems = 4
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Text = "Name"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 1
Text = "Address"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 2
Text = "City, State, Zip"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 3
Text = "Notes"
Object.Width = 2540
EndProperty
End
Begin MSComctlLib.ListView lstBillDocu
Height = 3375
Index = 2
Left = -74760
TabIndex = 7
Top = 480
Width = 9255
_ExtentX = 16325
_ExtentY = 5953
View = 3
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = 0 'False
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = 8388608
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 10.5
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
NumItems = 4
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Text = "Name"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 1
Text = "Address"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 2
Text = "City, State, Zip"
Object.Width = 2540
EndProperty
BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 3
Text = "Notes"
Object.Width = 2540
EndProperty
End
Begin VB.Label Label2
Height = 255
Left = 1560
TabIndex = 12
Top = 3600
Width = 975
End
Begin VB.Label Label1
Caption = "付件优惠率:"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Index = 2
Left = 4680
TabIndex = 11
Top = 3600
Width = 1335
End
Begin VB.Label Label1
Caption = "零件优惠率:"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Index = 1
Left = 3000
TabIndex = 10
Top = 3600
Width = 1575
End
Begin VB.Label Label1
Caption = "工时优惠率:"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Index = 0
Left = 240
TabIndex = 9
Top = 3600
Width = 1575
End
End
Begin BSE_Engine.BSE BSE1
Left = 7560
Top = 6480
_ExtentX = 6588
_ExtentY = 1085
End
Begin MSComctlLib.ListView lstAddress
Height = 2895
Left = 0
TabIndex = 8
Top = 840
Width = 9015
_ExtentX = 15901
_ExtentY = 5106
View = 3
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?