VBA中的COM接口 | 4.2框架优化

优化过程

RF-/STEEL EC3 design的目的是只将截面中的杆件转移。 在下面的示例中，所有杆件的截面均为“ IPE 300”， 假定杆件编号已知。

• 3D Viewer | Google
• 3D Viewer | Babylon
• 虚拟现实

系统

在RF‑STEEL EC3中的优化是根据先前在RFEM中计算的内力进行的。 这意味着不考虑模块截面变化引起的刚度变化。 其优点是无需重新计算结构就可以进行优化。因此可以非常快地完成工作。 不利的一面是，由于刚度发生了变化，导致重新分布，内力也因此发生了显着变化。 因此，优化的截面可以被超载。

为了有效地进行优化，总是始终只对模块中的几个截面进行优化，然后将新的截面传递到RFEM中，然后在模块中再次检查结果，

在RF-STEEL EC3中激活优化

为了优化模块中的截面，必须为单个截面激活该选项。 与手动操作不同，无法选择优化的方法。只能选择是否进行优化。 为了激活该选项，必须根据说明搜索截面。 当然，也可以搜索截面编号。 如果匹配，则修改相应的截面并将其传递给模块。 然后，回路将中断，因为仅检查一个截面。

'为所需的截面设置优化

暗淡 iStec3_cs As STEEL_EC3.CROSS_SECTION
count = iStec3Case.moGetCrossSectionsCount
暗淡 crsc_ec3_idx 一样长
crsc_ec3_idx = -1

关于技术提问和解答： i = 0 收件人 数-1
iStec3_cs = iStec3Case.moGetCrossSection（i，AT_INDEX）
If InStr（LCase（iStec3_cs.Description），LCase（crsc_desc））> 0 然后
iStec3_cs.Optimization = 真
iStec3Case.moSetCrossSection i，AT_INDEX，iStec3_cs
crsc_ec3_idx = i
退出
End If
更多 i

'为所需的截面设置优化
iStec3Case.moCalculate

激活优化后，计算模块工况。

将截面传递到 RFEM

使用截面编号可以传递截面。 为此，您需要得到RFEM截面的接口，然后输入一个新的TextID或一个新的截面标识符。 RFEM会识别出该识别符，并在传输后从数据库中获取相应的截面。

'将截面传输到RFEM
'从RF‑STEEL EC3中获取新的截面描述
iStec3_cs = iStec3Case.moGetCrossSection（crsc_ec3_idx，AT_INDEX）

'从RFEM中获取截面接口和属性
暗淡 iCrsc As RFEM5.CrossSection
集 iCrsc = iModelData.GetCrossSection（crsc_no，AtNo）
暗淡 crsc As RFEM5.CrossSection
crsc = iCrsc.GetData

'RF-STEEL EC3修改了新的截面
crsc.Description =“”
crsc.TextID = iStec3_cs。描述

'传递截面属性
iModelData.PrepareModification
iCrsc.SetData crsc
iModelData.FinishModification

小结

尤其是对于重复使用的结构，RF-/STEEL EC3中的优化选项提供了很好的工作便利。 在RFEM中重新计算具有优化截面的结构非常重要。 使用COM接口进行迭代是很容易的。 这样自动优化可以极大地简化和加快工作流程。