📄 frmmain.frm
字号:
Format = 26935297
CurrentDate = 38032
End
Begin VB.TextBox txtDriver
Appearance = 0 'Flat
Height = 330
Left = 4560
TabIndex = 60
Top = 3600
Width = 1455
End
Begin VB.TextBox txtEngineNo
Appearance = 0 'Flat
Height = 330
Left = 1800
TabIndex = 59
Top = 4320
Width = 1455
End
Begin VB.TextBox txtOutAir
Appearance = 0 'Flat
Height = 330
Left = 4560
TabIndex = 58
Top = 4320
Width = 1455
End
Begin VB.TextBox txtLicense
Appearance = 0 'Flat
Height = 330
Left = 1800
TabIndex = 57
Top = 3600
Width = 1455
End
Begin VB.TextBox txtBelong
Appearance = 0 'Flat
Height = 330
Left = 1800
TabIndex = 56
Top = 4680
Width = 2775
End
Begin VB.TextBox txtBuyPrice
Appearance = 0 'Flat
Height = 330
Left = 4560
TabIndex = 55
Top = 3960
Width = 1455
End
Begin VB.TextBox txtType
Appearance = 0 'Flat
Height = 330
Left = 4560
TabIndex = 54
Top = 3240
Width = 1455
End
Begin VB.TextBox txtBuyCarID
Appearance = 0 'Flat
Height = 330
Left = 1800
TabIndex = 53
Top = 3240
Width = 1455
End
Begin MSFlexGridLib.MSFlexGrid MSFBuyCar
Height = 2535
Left = 300
TabIndex = 52
Top = 555
Width = 6060
_ExtentX = 10689
_ExtentY = 4471
_Version = 393216
Cols = 9
FixedCols = 0
BackColorSel = 16761024
ForeColorSel = 255
FocusRect = 0
SelectionMode = 1
AllowUserResizing= 1
Appearance = 0
FormatString = $"frmMain.frx":1F58
End
Begin MSComCtl2.DTPicker DTPOutEndDate
Height = 330
Left = -73740
TabIndex = 73
Top = 3585
Width = 1395
_ExtentX = 2461
_ExtentY = 582
_Version = 393216
Format = 26935297
CurrentDate = 38032
End
Begin MSFlexGridLib.MSFlexGrid MSFOutCar
Height = 2535
Left = -74700
TabIndex = 79
Top = 540
Width = 6060
_ExtentX = 10689
_ExtentY = 4471
_Version = 393216
Cols = 10
BackColorSel = 16761024
ForeColorSel = 255
FocusRect = 0
SelectionMode = 1
AllowUserResizing= 1
Appearance = 0
FormatString = $"frmMain.frx":2017
End
Begin MSComCtl2.DTPicker DTPOutStartDate
Height = 330
Left = -73740
TabIndex = 87
Top = 3240
Width = 1395
_ExtentX = 2461
_ExtentY = 582
_Version = 393216
Format = 26935297
CurrentDate = 38032
End
Begin MSComCtl2.DTPicker DTPOutEndTime
Height = 330
Left = -72300
TabIndex = 88
Top = 3585
Width = 915
_ExtentX = 1614
_ExtentY = 582
_Version = 393216
CustomFormat = "H:mm"
Format = 26935299
UpDown = -1 'True
CurrentDate = 38032
End
Begin MSComCtl2.DTPicker DTPOutStartTime
Height = 330
Left = -72300
TabIndex = 89
Top = 3240
Width = 915
_ExtentX = 1614
_ExtentY = 582
_Version = 393216
CustomFormat = "H:mm"
Format = 26935299
UpDown = -1 'True
CurrentDate = 38032
End
Begin MSComCtl2.DTPicker DTPFixDate
Height = 330
Left = -71940
TabIndex = 91
Top = 3225
Width = 1275
_ExtentX = 2249
_ExtentY = 582
_Version = 393216
Format = 26935297
CurrentDate = 38032
End
Begin MSFlexGridLib.MSFlexGrid MSFFixCar
Height = 2535
Left = -74700
TabIndex = 97
Top = 540
Width = 6060
_ExtentX = 10689
_ExtentY = 4471
_Version = 393216
Cols = 9
BackColorSel = 16761024
ForeColorSel = 255
FocusRect = 0
SelectionMode = 1
AllowUserResizing= 1
Appearance = 0
FormatString = "^|^ 车 牌 号 |^ 日 期 |^ 损 坏 程 度 |^ 费 用 名 称 |^ 金 额 |^ 经 手 人 |^ 维 修 内 容 |^ 备 注 "
End
Begin VB.Label Label28
AutoSize = -1 'True
Caption = "损坏程度"
Height = 180
Left = -70575
TabIndex = 106
Top = 3300
Width = 720
End
Begin VB.Label Label22
AutoSize = -1 'True
Caption = "维修内容"
Height = 180
Left = -74750
TabIndex = 105
Top = 4060
Width = 720
End
Begin VB.Label Label31
AutoSize = -1 'True
Caption = "车 牌 号"
Height = 180
Left = -74750
TabIndex = 103
Top = 3300
Width = 720
End
Begin VB.Label Label29
AutoSize = -1 'True
Caption = "费用名称"
Height = 180
Left = -74750
TabIndex = 102
Top = 3680
Width = 720
End
Begin VB.Label Label27
AutoSize = -1 'True
Caption = "金 额"
Height = 180
Left = -72435
TabIndex = 101
Top = 3680
Width = 450
End
Begin VB.Label Label26
AutoSize = -1 'True
Caption = "经手人"
Height = 180
Left = -70395
TabIndex = 100
Top = 3675
Width = 540
End
Begin VB.Label Label25
AutoSize = -1 'True
Caption = "日 期"
Height = 180
Left = -72435
TabIndex = 99
Top = 3300
Width = 450
End
Begin VB.Label Label21
AutoSize = -1 'True
Caption = "备 注"
Height = 180
Left = -74570
TabIndex = 98
Top = 4440
Width = 540
End
Begin VB.Label Label24
AutoSize = -1 'True
Caption = "返回时间"
Height = 180
Left = -74640
TabIndex = 86
Top = 3660
Width = 720
End
Begin VB.Label Label23
AutoSize = -1 'True
Caption = "出发时间"
Height = 180
Left = -74640
TabIndex = 85
Top = 3300
Width = 720
End
Begin VB.Label Label20
AutoSize = -1 'True
Caption = "地点"
Height = 180
Left = -70815
TabIndex = 84
Top = 3720
Width = 360
End
Begin VB.Label Label19
AutoSize = -1 'True
Caption = "里程"
Height = 180
Left = -70275
TabIndex = 83
Top = 4080
Width = 360
End
Begin VB.Label Label18
AutoSize = -1 'True
Caption = "事由"
Height = 180
Left = -74640
TabIndex = 82
Top = 4080
Width = 360
End
Begin VB.Label Label17
AutoSize = -1 'True
Caption = "使用单位"
Height = 180
Left = -71160
TabIndex = 81
Top = 3360
Width = 720
End
Begin VB.Label Label16
AutoSize = -1 'True
Caption = "备注"
Height = 180
Left = -74640
TabIndex = 80
Top = 4500
Width = 360
End
Begin VB.Label Label15
AutoSize = -1 'True
Caption = "使用人或部门"
Height = 180
Left = 600
TabIndex = 70
Top = 4755
Width = 1080
End
Begin VB.Label Label14
AutoSize = -1 'True
Caption = "引擎号码"
Height = 180
Left = 960
TabIndex = 69
Top = 4395
Width = 720
End
Begin VB.Label Label13
AutoSize = -1 'True
Caption = "购置日期"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -