📄 frmfixedadd.frm
字号:
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目8"
Height = 180
Index = 7
Left = -71670
TabIndex = 134
Top = 1815
Visible = 0 'False
Width = 1170
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目9"
Height = 180
Index = 8
Left = -74895
TabIndex = 133
Top = 2280
Visible = 0 'False
Width = 1170
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目10"
Height = 180
Index = 9
Left = -71670
TabIndex = 132
Top = 2235
Visible = 0 'False
Width = 1260
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目11"
Height = 180
Index = 10
Left = -74895
TabIndex = 131
Top = 2715
Visible = 0 'False
Width = 1260
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目12"
Height = 180
Index = 11
Left = -71670
TabIndex = 130
Top = 2655
Visible = 0 'False
Width = 1260
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目13"
Height = 180
Index = 12
Left = -74895
TabIndex = 129
Top = 3150
Visible = 0 'False
Width = 1260
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目14"
Height = 180
Index = 13
Left = -71670
TabIndex = 128
Top = 3120
Visible = 0 'False
Width = 1260
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目15"
Height = 180
Index = 14
Left = -74910
TabIndex = 127
Top = 3570
Visible = 0 'False
Width = 1260
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目16"
Height = 180
Index = 15
Left = -71655
TabIndex = 126
Top = 3555
Visible = 0 'False
Width = 1260
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目17"
Height = 180
Index = 16
Left = -74910
TabIndex = 125
Top = 3990
Visible = 0 'False
Width = 1260
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目18"
Height = 180
Index = 17
Left = -71655
TabIndex = 124
Top = 3975
Visible = 0 'False
Width = 1260
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目19"
Height = 180
Index = 18
Left = -74910
TabIndex = 123
Top = 4425
Visible = 0 'False
Width = 1260
End
Begin VB.Label lblCustom
AutoSize = -1 'True
Caption = "自定卡片项目20"
Height = 180
Index = 19
Left = -71655
TabIndex = 122
Top = 4410
Visible = 0 'False
Width = 1260
End
Begin MSForms.CheckBox chkDepAll
Height = 330
Left = -71925
TabIndex = 54
Top = 5310
Width = 1770
VariousPropertyBits= 1015023643
BackColor = -2147483633
ForeColor = -2147483630
DisplayStyle = 4
Size = "3122;582"
Value = "1"
Caption = "最后一期提完折旧"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "增加日期"
Height = 180
Index = 11
Left = 3510
TabIndex = 91
Top = 2280
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "使用状态"
Height = 180
Index = 10
Left = 3510
TabIndex = 90
Top = 1950
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "存放地点"
Height = 180
Index = 9
Left = 3510
TabIndex = 89
Top = 1590
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "技术特征"
Height = 180
Index = 8
Left = 3510
TabIndex = 88
Top = 1230
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "规格型号"
Height = 180
Index = 7
Left = 3510
TabIndex = 87
Top = 870
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "固资编码"
Height = 180
Index = 6
Left = 3510
TabIndex = 86
Top = 510
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "增加方式"
Height = 180
Index = 5
Left = 150
TabIndex = 85
Top = 2280
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "固资类别"
Height = 180
Index = 4
Left = 150
TabIndex = 84
Top = 1950
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "经济用途"
Height = 180
Index = 3
Left = 150
TabIndex = 83
Top = 1590
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "建造单位"
Height = 180
Index = 2
Left = 150
TabIndex = 82
Top = 1230
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "固资名称"
Height = 180
Index = 1
Left = 150
TabIndex = 81
Top = 870
Width = 720
End
Begin VB.Label Label25
AutoSize = -1 'True
Caption = "净值"
Height = 180
Left = -74880
TabIndex = 76
Top = 3570
Width = 360
End
Begin VB.Label Label24
AutoSize = -1 'True
Caption = "累计折旧"
Height = 180
Left = -74880
TabIndex = 75
Top = 3210
Width = 720
End
Begin VB.Label lblOperator
AutoSize = -1 'True
Caption = "建卡人:"
Height = 180
Left = 4890
TabIndex = 62
Top = 5460
Width = 720
End
Begin VB.Label Label15
AutoSize = -1 'True
Caption = "备注"
Height = 180
Left = 150
TabIndex = 61
Top = 5460
Width = 360
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "卡片编号"
Height = 180
Index = 0
Left = 150
TabIndex = 56
Top = 510
Width = 720
End
End
Begin MSForms.CheckBox chkIsVoid
Height = 330
Left = 6750
TabIndex = 6
Top = 2790
Visible = 0 'False
Width = 765
VariousPropertyBits= 1015023643
BackColor = -2147483633
ForeColor = -2147483630
DisplayStyle = 4
Size = "1349;582"
Value = "0"
Caption = "作废"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
End
Begin MSForms.CheckBox chkPrint
Height = 270
Left = 6750
TabIndex = 5
Top = 2550
Width = 945
VariousPropertyBits= 1015023643
BackColor = -2147483633
ForeColor = -2147483630
DisplayStyle = 4
Size = "1667;476"
Value = "0"
Caption = "待打印"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
End
Begin VB.Menu mnuEditCard
Caption = "Edit1"
Visible = 0 'False
Begin VB.Menu mnuAddCard
Ca
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -