📄 frmfixedotheralter.frm
字号:
Visible = 0 'False
Width = 1875
End
Begin VB.TextBox txtCustom
Height = 270
Index = 8
Left = -73605
TabIndex = 155
Top = 2115
Visible = 0 'False
Width = 1845
End
Begin VB.TextBox txtCustom
Height = 270
Index = 9
Left = -70380
TabIndex = 156
Top = 2070
Visible = 0 'False
Width = 1875
End
Begin VB.TextBox txtCustom
Height = 270
Index = 10
Left = -73605
TabIndex = 157
Top = 2550
Visible = 0 'False
Width = 1845
End
Begin VB.TextBox txtCustom
Height = 270
Index = 11
Left = -70380
TabIndex = 158
Top = 2490
Visible = 0 'False
Width = 1875
End
Begin VB.TextBox txtCustom
Height = 270
Index = 12
Left = -73605
TabIndex = 159
Top = 2985
Visible = 0 'False
Width = 1845
End
Begin MSRDC.MSRDC datAux
Height = 330
Left = 5760
Top = 5400
Visible = 0 'False
Width = 1200
_ExtentX = 2117
_ExtentY = 582
_Version = 393216
Options = 0
CursorDriver = 0
BOFAction = 0
EOFAction = 0
RecordsetType = 1
LockType = 3
QueryType = 0
Prompt = 3
Appearance = 1
QueryTimeout = 30
RowsetSize = 100
LoginTimeout = 15
KeysetSize = 0
MaxRows = 0
ErrorThreshold = -1
BatchSize = 15
BackColor = -2147483643
ForeColor = -2147483640
Enabled = -1 'True
ReadOnly = 0 'False
Appearance = -1 'True
DataSourceName = ""
RecordSource = ""
UserName = ""
Password = ""
Connect = ""
LogMessages = ""
Caption = "MSRDC1"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin GATLCTRLLibCtl.CalEdit valEdit
Height = 270
Left = 2685
OleObjectBlob = "frmFixedOtherAlter.frx":0070
TabIndex = 142
Top = 4380
Width = 930
End
Begin AtlEdit.TEdit txtEdit
Height = 285
Left = 270
TabIndex = 141
Top = 4365
Width = 750
_ExtentX = 1323
_ExtentY = 503
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Text = ""
Appearance = 0
End
Begin AtlEdit.TEdit tEdit1
Height = 240
Index = 0
Left = 1020
TabIndex = 0
Top = 480
Width = 1740
_ExtentX = 3069
_ExtentY = 423
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Text = ""
Appearance = 0
BorderStyle = 0
End
Begin GACALENDARLibCtl.Calendar cldAlterDate
Height = 300
Left = -74040
OleObjectBlob = "frmFixedOtherAlter.frx":00F1
TabIndex = 75
Top = 450
Width = 2115
End
Begin GATLCTRLLibCtl.CalEdit TEdit5
Height = 285
Index = 0
Left = -73665
OleObjectBlob = "frmFixedOtherAlter.frx":017A
TabIndex = 43
Top = 4335
Width = 1710
End
Begin ListRefer.ListText ltxtFixedType
Height = 300
Left = 960
TabIndex = 9
Top = 1890
Width = 2115
_ExtentX = 3731
_ExtentY = 556
CodeSort = -1 'True
BackColor = -2147483643
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.ComboBox cboFixCode
Height = 300
Left = 990
TabIndex = 1
TabStop = 0 'False
Top = 450
Width = 2085
End
Begin VB.Frame Frame10
Caption = "累计折旧调整"
Height = 975
Left = -71820
TabIndex = 125
Top = 4350
Width = 3285
Begin VB.OptionButton Option4
Caption = "重算折旧并自动调整累计折旧 "
Height = 195
Index = 1
Left = 150
TabIndex = 56
Top = 630
Width = 2655
End
Begin VB.OptionButton Option4
Caption = "不调整以前累计折旧"
Height = 195
Index = 0
Left = 150
TabIndex = 55
Top = 330
Value = -1 'True
Width = 2055
End
End
Begin VB.Frame Frame9
Caption = "折旧计算因素"
Height = 1245
Left = -71820
TabIndex = 119
Top = 2880
Width = 3285
Begin VB.OptionButton Option1
Caption = "按变动前各因素计提折旧"
Height = 345
Index = 2
Left = 90
TabIndex = 54
Top = 840
Width = 2925
End
Begin VB.OptionButton Option1
Caption = "按现在净值和剩余期间计提折旧"
Height = 345
Index = 0
Left = 90
TabIndex = 52
Top = 240
Width = 2925
End
Begin VB.OptionButton Option1
Caption = "按变动后各因素计提折旧"
Height = 345
Index = 1
Left = 90
TabIndex = 53
Top = 540
Value = -1 'True
Width = 2925
End
End
Begin VB.Frame Frame8
Caption = "折旧信息变动"
Height = 2325
Left = -71820
TabIndex = 111
Top = 450
Width = 3285
Begin GATLCTRLLibCtl.CalEdit TEdit3
Height = 270
Index = 0
Left = 2070
OleObjectBlob = "frmFixedOtherAlter.frx":01FB
TabIndex = 49
Top = 945
Width = 1080
End
Begin VB.ComboBox cboDPMethod
Height = 300
Left = 1650
TabIndex = 46
Top = 240
Width = 1515
End
Begin GATLCTRLLibCtl.CalEdit TEdit3
Height = 270
Index = 1
Left = 1785
OleObjectBlob = "frmFixedOtherAlter.frx":027C
TabIndex = 50
Top = 1275
Width = 1365
End
Begin GATLCTRLLibCtl.CalEdit TEdit3
Height = 270
Index = 2
Left = 1785
OleObjectBlob = "frmFixedOtherAlter.frx":02FD
TabIndex = 51
Top = 1590
Width = 1365
End
Begin GATLCTRLLibCtl.CalEdit TEdit3
Height = 270
Index = 3
Left = 2070
OleObjectBlob = "frmFixedOtherAlter.frx":037E
TabIndex = 48
Top = 615
Visible = 0 'False
Width = 1080
End
Begin GACALENDARLibCtl.SpinEdit SpinYear
Height = 285
Left = 2070
OleObjectBlob = "frmFixedOtherAlter.frx":03FF
TabIndex = 47
Top = 615
Width = 1065
End
Begin VB.Label lblDeprePerPeriod
AutoSize = -1 'True
Caption = "0"
Height = 180
Left = 1530
TabIndex = 118
Top = 2040
Width = 90
End
Begin VB.Label Label4
AutoSize = -1 'True
Caption = "预计每月折旧 = "
Height = 180
Index = 5
Left = 120
TabIndex = 117
Top = 2040
Width = 1350
End
Begin VB.Label Label4
AutoSize = -1 'True
Caption = "变动后预计净残值"
Enabled = 0 'False
Height = 180
Index = 4
Left = 120
TabIndex = 116
Top = 1620
Width = 1440
End
Begin VB.Label Label4
AutoSize = -1 'True
Caption = "预计净残值变动"
Height = 180
Index = 3
Left = 120
TabIndex = 115
Top = 1320
Width = 1260
End
Begin VB.Label Label4
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -