| 前页 | 后页 |
元素额外
这些是访问和使用附加元素的代码示例，例如方案，约束和要求。
子元素额外
昏暗元素作为对象
暗淡为对象
昏暗的IDX为整数
Dim bDel as boolean
bDel =真
尝试
元素= m_Repository.GetElementByID（129）
'元素的管理约束
'展示addnew和delete
o = element.Constraints.AddNew（“追加”，“类型”）
如果不是o.Update Then
Console.WriteLine（“约束错误：” + o.GetLastError（））
万一
element.Constraints.Refresh
对于idx = 0到element.Constraints.Count -1
o = element.Constraints.GetAt（idx）
Console.WriteLine（o.Name）
If（o.Name =“追加”）然后
If bDel然后element.Constraints.Delete（idx）
万一
下一个
'的努力
o = element.Efforts.AddNew（“追加”，“类型”）
如果不是o.Update Then
Console.WriteLine（“努力错误：” + o.GetLastError（））
万一
要素。努力。刷新
对于idx = 0到element.Efforts.Count -1
o = element.Efforts.GetAt（idx）
Console.WriteLine（o.Name）
If（o.Name =“追加”）然后
If bDel然后element.Efforts.Delete（idx）
万一
下一个
风险
o = element.Risks.AddNew（“追加”，“类型”）
如果不是o.Update Then
Console.WriteLine（“风险错误：” + o.GetLastError（））
万一
element.Risks.Refresh
对于idx = 0到element.Risks.Count -1
o = element.Risks.GetAt（idx）
Console.WriteLine（o.Name）
If（o.Name =“追加”）然后
If bDel然后element.Risks.Delete（idx）
万一
下一个
'指标
o = element.Metrics.AddNew（“追加”，“更改”）
如果不是o.Update Then
Console.WriteLine（“指标错误：” + o.GetLastError（））
万一
element.Metrics.Refresh
对于idx = 0到element.Metrics.Count -1
o = element.Metrics.GetAt（idx）
Console.WriteLine（o.Name）
If（o.Name =“追加”）然后
If bDel然后element.Metrics.Delete（idx）
万一
下一个
'标记的值
o = element.TaggedValues.AddNew（“追加”，“更改”）
如果不是o.Update Then
Console.WriteLine（“ TaggedValues错误：” + o.GetLastError（））
万一
element.TaggedValues.Refresh
对于idx = 0到element.TaggedValues.Count -1
o = element.TaggedValues.GetAt（idx）
Console.WriteLine（o.Name）
If（o.Name =“追加”）然后
If bDel然后element.TaggedValues.Delete（idx）
万一
下一个
'场景
o = element.Scenarios.AddNew（“追加”，“更改”）
如果不是o.Update Then
Console.WriteLine（“场景错误：” + o.GetLastError（））
万一
element.Scenarios.Refresh
对于idx = 0到element.Scenarios.Count -1
o = element.Scenarios.GetAt（idx）
Console.WriteLine（o.Name）
If（o.Name =“追加”）然后
If bDel然后element.Scenarios.Delete（idx）
万一
下一个
'文件
o = element.Files.AddNew（“ MyFile”，“ doc”）
如果不是o.Update Then
Console.WriteLine（“文件错误：” + o.GetLastError（））
万一
element.Files.Refresh
对于idx = 0到element.Files.Count -1
o = element.Files.GetAt（idx）
Console.WriteLine（o.Name）
If（o.Name =“ MyFile”）然后
If bDel然后element.Files.Delete（idx）
万一
下一个
'测试
o = element.Tests.AddNew（“ TestPlan”，“ Load”）
如果不是o.Update Then
Console.WriteLine（“测试错误：” + o.GetLastError（））
万一
element.Tests.Refresh
对于idx = 0到element.Tests.Count -1
o = element.Tests.GetAt（idx）
Console.WriteLine（o.Name）
If（o.Name =“ TestPlan”）然后
If bDel然后element.Tests.Delete（idx）
万一
下一个
'缺陷
o = element.Issues.AddNew（“ Broken”，“ Defect”）
如果不是o.Update Then
Console.WriteLine（“发出错误：” + o.GetLastError（））
万一
元素。问题。刷新
对于idx = 0到element.Issues.Count -1
o = element.Issues.GetAt（idx）
Console.WriteLine（o.Name）
If（o.Name =“ Broken”）然后
If bDel然后element.Issues.Delete（idx）
万一
下一个
'更改
o = element.Issues.AddNew（“ Change”，“ Change”）
如果不是o.Update Then
Console.WriteLine（“发出错误：” + o.GetLastError（））
万一
元素。问题。刷新
对于idx = 0到element.Issues.Count -1
o = element.Issues.GetAt（idx）
Console.WriteLine（o.Name）
If（o.Name =“更改”）然后
If bDel然后element.Issues.Delete（idx）
万一
下一个
抓住e作为例外
Console.WriteLine（element.Methods.GetLastError（））
Console.WriteLine（e）
结束尝试
结束子