📄 form3.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Begin VB.Form Form3
Caption = "装箱效率计算程序"
ClientHeight = 9315
ClientLeft = 60
ClientTop = 345
ClientWidth = 13770
Icon = "Form3.frx":0000
LinkTopic = "Form3"
MaxButton = 0 'False
ScaleHeight = 9315
ScaleWidth = 13770
StartUpPosition = 1 '所有者中心
Begin VB.Frame Frame7
Caption = "装箱容器选择"
Height = 9045
Left = 105
TabIndex = 22
Top = 150
Width = 6840
Begin VB.OptionButton Option1
Caption = "使用托盘"
Height = 225
Index = 1
Left = 105
TabIndex = 56
Top = 4620
Width = 2115
End
Begin VB.OptionButton Option1
Caption = "使用集装箱"
Height = 225
Index = 0
Left = 105
TabIndex = 55
Top = 210
Value = -1 'True
Width = 2115
End
Begin VB.Frame Frame2
Appearance = 0 'Flat
Caption = "常见托盘尺寸表"
ForeColor = &H80000008&
Height = 4000
Left = 105
TabIndex = 35
Top = 4935
Width = 6615
Begin VB.CommandButton Command11
Caption = "增加"
Height = 300
Left = 2835
TabIndex = 54
Top = 3600
Width = 1000
End
Begin VB.CommandButton Command10
Caption = "修改"
Height = 300
Left = 4095
TabIndex = 53
Top = 3600
Width = 1000
End
Begin VB.CommandButton Command9
Caption = "删除"
Height = 300
Left = 5355
TabIndex = 52
Top = 3600
Width = 1000
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 0
Left = 840
TabIndex = 41
Top = 2940
Width = 1100
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 1
Left = 3045
TabIndex = 40
Top = 2940
Width = 1100
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 2
Left = 5250
TabIndex = 39
Top = 2940
Width = 1100
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 3
Left = 840
TabIndex = 38
Top = 3255
Width = 1100
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 4
Left = 3045
TabIndex = 37
Top = 3255
Width = 1100
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 5
Left = 5250
TabIndex = 36
Top = 3255
Width = 1100
End
Begin MSComctlLib.ListView ListView2
Height = 2400
Left = 120
TabIndex = 42
Top = 315
Width = 6375
_ExtentX = 11245
_ExtentY = 4233
View = 3
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = 0 'False
AllowReorder = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 0
NumItems = 7
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Text = "选择"
Object.Width = 970
EndProperty
BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 1
Text = "类型"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 1
SubItemIndex = 2
Text = "长(mm)"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 1
SubItemIndex = 3
Text = "宽(mm)"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(5) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 1
SubItemIndex = 4
Text = "高(mm)"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(6) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 1
SubItemIndex = 5
Text = "载重(g)"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(7) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 6
Text = "自高(mm)"
Object.Width = 1764
EndProperty
End
Begin VB.Label Label1
Caption = "名称"
Height = 255
Index = 6
Left = 210
TabIndex = 48
Top = 2940
Width = 975
End
Begin VB.Label Label1
Caption = "长(mm)"
Height = 255
Index = 12
Left = 2310
TabIndex = 47
Top = 2940
Width = 975
End
Begin VB.Label Label1
Caption = "宽(mm)"
Height = 255
Index = 13
Left = 4515
TabIndex = 46
Top = 2940
Width = 975
End
Begin VB.Label Label1
Caption = "载重(g)"
Height = 255
Index = 14
Left = 2310
TabIndex = 45
Top = 3255
Width = 975
End
Begin VB.Label Label1
Caption = "高(mm)"
Height = 255
Index = 15
Left = 210
TabIndex = 44
Top = 3255
Width = 975
End
Begin VB.Label Label1
Caption = "自高(mm)"
Height = 255
Index = 16
Left = 4515
TabIndex = 43
Top = 3255
Width = 975
End
End
Begin VB.Frame Frame1
Appearance = 0 'Flat
Caption = "常见集装箱尺寸表"
ForeColor = &H80000008&
Height = 4000
Left = 105
TabIndex = 23
Top = 525
Width = 6615
Begin VB.CommandButton Command8
Caption = "增加"
Height = 300
Left = 2835
TabIndex = 51
Top = 3600
Width = 1000
End
Begin VB.CommandButton Command7
Caption = "修改"
Height = 300
Left = 4095
TabIndex = 50
Top = 3600
Width = 1000
End
Begin VB.CommandButton Command6
Caption = "删除"
Height = 300
Left = 5355
TabIndex = 49
Top = 3600
Width = 1000
End
Begin VB.TextBox Text2
Appearance = 0 'Flat
Height = 270
Index = 0
Left = 840
TabIndex = 28
Top = 2940
Width = 1100
End
Begin VB.TextBox Text2
Appearance = 0 'Flat
Height = 270
Index = 1
Left = 3045
TabIndex = 27
Top = 2940
Width = 1100
End
Begin VB.TextBox Text2
Appearance = 0 'Flat
Height = 270
Index = 2
Left = 5250
TabIndex = 26
Top = 2940
Width = 1100
End
Begin VB.TextBox Text2
Appearance = 0 'Flat
Height = 270
Index = 3
Left = 840
TabIndex = 25
Top = 3255
Width = 1100
End
Begin VB.TextBox Text2
Appearance = 0 'Flat
Height = 270
Index = 4
Left = 3045
TabIndex = 24
Top = 3255
Width = 1100
End
Begin MSComctlLib.ListView ListView1
Height = 2400
Left = 105
TabIndex = 29
Top = 315
Width = 6375
_ExtentX = 11245
_ExtentY = 4233
View = 3
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = 0 'False
AllowReorder = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 0
NumItems = 7
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Text = "选择"
Object.Width = 970
EndProperty
BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 1
Text = "类型"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 1
SubItemIndex = 2
Text = "长(mm)"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 1
SubItemIndex = 3
Text = "宽(mm)"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(5) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 1
SubItemIndex = 4
Text = "高(mm)"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(6) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 1
SubItemIndex = 5
Text = "载重(g)"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(7) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 6
Object.Width = 1764
EndProperty
End
Begin VB.Label Label1
Caption = "高(mm)"
Height = 255
Index = 7
Left = 210
TabIndex = 34
Top = 3255
Width = 975
End
Begin VB.Label Label1
Caption = "载重(g)"
Height = 255
Index = 8
Left = 2310
TabIndex = 33
Top = 3255
Width = 975
End
Begin VB.Label Label1
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -