📄 f_peixunxiangmushishi.frm
字号:
EndProperty
EndProperty
SplitCount = 1
BeginProperty Split0
BeginProperty Column00
EndProperty
BeginProperty Column01
EndProperty
EndProperty
End
End
Begin VB.TextBox txtFields
DataField = "培训实施计划编号"
Height = 285
Index = 0
Left = 2520
TabIndex = 81
Top = 960
Width = 1455
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 300
Left = 4440
ScaleHeight = 300
ScaleWidth = 7080
TabIndex = 73
Top = 8160
Width = 7080
Begin VB.CommandButton CmdAdd
Caption = "增加"
Height = 300
Left = 1080
TabIndex = 80
Top = 0
Width = 1095
End
Begin VB.CommandButton cmdEdit
Caption = "编辑"
Height = 300
Left = 2280
TabIndex = 79
Top = 0
Width = 1095
End
Begin VB.CommandButton CmdDelete
Caption = "删除"
Height = 300
Left = 3480
TabIndex = 78
Top = 0
Width = 1095
End
Begin VB.CommandButton cmdRefresh
Caption = "刷新"
Height = 300
Left = 4680
TabIndex = 77
Top = 0
Width = 1095
End
Begin VB.CommandButton cmdClose
Caption = "关闭"
Height = 300
Left = 5880
TabIndex = 76
Top = 0
Width = 1095
End
Begin VB.CommandButton cmdUpdate
Caption = "保存"
Height = 300
Left = 4680
TabIndex = 75
Top = 0
Visible = 0 'False
Width = 1095
End
Begin VB.CommandButton cmdCancel
Caption = "取消"
Height = 300
Left = 5880
TabIndex = 74
Top = 0
Visible = 0 'False
Width = 1095
End
End
Begin VB.Frame Frame2
Height = 1935
Left = 600
TabIndex = 37
Top = 720
Width = 10935
Begin VB.TextBox txtFields
DataField = "变动说明"
Height = 645
Index = 19
Left = 7920
TabIndex = 72
Top = 1200
Width = 2895
End
Begin VB.TextBox txtFields
DataField = "服务年限"
Height = 285
Index = 20
Left = 9360
TabIndex = 70
Top = 600
Width = 1455
End
Begin MSComCtl2.DTPicker DTPicker6
DataField = "实际举办日期"
Height = 300
Left = 1080
TabIndex = 68
Top = 1560
Width = 1455
_ExtentX = 2566
_ExtentY = 529
_Version = 393216
CheckBox = -1 'True
DateIsNull = -1 'True
Format = 66519041
CurrentDate = 36188
End
Begin MSComCtl2.DTPicker DTPicker2
DataField = "计划举办日期"
Height = 300
Left = 1080
TabIndex = 63
Top = 1200
Width = 1455
_ExtentX = 2566
_ExtentY = 529
_Version = 393216
CheckBox = -1 'True
DateIsNull = -1 'True
Format = 66519041
CurrentDate = 36186
End
Begin VB.TextBox txtFields
DataField = "培训对象"
Height = 285
Index = 6
Left = 5880
TabIndex = 45
Top = 600
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "培训种类"
Height = 285
Index = 5
Left = 1920
TabIndex = 44
Top = 600
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "培训计划编号"
Height = 285
Index = 4
Left = 9360
TabIndex = 43
Top = 240
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "项目名称"
Height = 285
Index = 3
Left = 5880
TabIndex = 42
Top = 240
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "实际参加人数"
Height = 285
Index = 12
Left = 5880
TabIndex = 41
Top = 1560
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "实际培训时数"
Height = 285
Index = 11
Left = 3600
TabIndex = 40
Top = 1560
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "计划参加人数"
Height = 285
Index = 9
Left = 5880
TabIndex = 39
Top = 1200
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "计划培训时数"
Height = 285
Index = 8
Left = 3600
TabIndex = 38
Top = 1200
Width = 1455
End
Begin VB.Label lblLabels
Caption = "实施计划编号:"
Height = 255
Index = 18
Left = 120
TabIndex = 87
Top = 240
Width = 1095
End
Begin VB.Label lblLabels
Caption = "变动说明:"
Height = 255
Index = 19
Left = 7920
TabIndex = 71
Top = 960
Width = 1335
End
Begin VB.Label lblLabels
Caption = "服务年限:"
Height = 255
Index = 20
Left = 7920
TabIndex = 69
Top = 600
Width = 855
End
Begin VB.Label lblLabels
Caption = "培训计划编号:"
Height = 255
Index = 4
Left = 7920
TabIndex = 64
Top = 240
Width = 1095
End
Begin VB.Label lblLabels
Caption = "培训对象:"
Height = 255
Index = 6
Left = 4200
TabIndex = 53
Top = 600
Width = 855
End
Begin VB.Label lblLabels
Caption = "培训种类:"
Height = 255
Index = 5
Left = 120
TabIndex = 52
Top = 600
Width = 735
End
Begin VB.Label lblLabels
Caption = "项目名称:"
Height = 255
Index = 3
Left = 4200
TabIndex = 51
Top = 240
Width = 855
End
Begin VB.Label lblLabels
Caption = "计划举办日期:"
Height = 255
Index = 7
Left = 1080
TabIndex = 50
Top = 960
Width = 1215
End
Begin VB.Label lblLabels
Caption = "计划培训时数:"
Height = 255
Index = 8
Left = 3600
TabIndex = 49
Top = 960
Width = 1335
End
Begin VB.Label lblLabels
Caption = "计划参加人数:"
Height = 255
Index = 9
Left = 6000
TabIndex = 48
Top = 960
Width = 1215
End
Begin VB.Label lblLabels
Caption = "实际"
Height = 255
Index = 11
Left = 120
TabIndex = 47
Top = 1560
Width = 735
End
Begin VB.Label lblLabels
Caption = "计划"
Height = 255
Index = 10
Left = 120
TabIndex = 46
Top = 1200
Width = 615
End
End
Begin VB.Frame Frame3
Height = 1215
Left = 600
TabIndex = 25
Top = 2520
Width = 10935
Begin VB.TextBox txtFields
Appearance = 0 'Flat
DataField = "费用变动说明"
Height = 645
Index = 26
Left = 7920
TabIndex = 94
Top = 480
Width = 2895
End
Begin VB.TextBox txtFields
DataField = "培训费用合计实际"
Height = 285
Index = 18
Left = 5880
TabIndex = 31
Top = 840
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "培训费用合计预算"
Height = 285
Index = 17
Left = 5880
TabIndex = 30
Top = 480
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "培训费用间接实际"
Height = 285
Index = 16
Left = 3600
TabIndex = 29
Top = 840
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "培训费用间接预算"
Height = 285
Index = 15
Left = 3600
TabIndex = 28
Top = 480
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "培训费用直接实际"
Height = 285
Index = 14
Left = 1080
TabIndex = 27
Top = 840
Width = 1455
End
Begin VB.TextBox txtFields
DataField = "培训费用直接预算"
Height = 285
Index = 13
Left = 1080
TabIndex = 26
Top = 480
Width = 1455
End
Begin VB.Label lblLabels
Caption = "费用变动说明:"
Height = 255
Index = 33
Left = 7920
TabIndex = 95
Top = 240
Width = 1335
End
Begin VB.Label lblLabels
Caption = "合计:"
Height = 255
Index = 17
Left = 5880
TabIndex = 36
Top = 240
Width = 615
End
Begin VB.Label lblLabels
Caption = "间接费用:"
Height = 255
Index = 16
Left = 3600
TabIndex = 35
Top = 240
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -