Page 105 - 6735

view.PositionX = CDbl(TextBox2.Text)
view.PositionY = CDbl(TextBox3.Text)
view.ReferenceModelPath = TextBox4.Text
view.Configuration = TextBox5.Text
End Sub

SOLIDWORKS Simulation API

Нижче наведено макрос для SOLIDWORKS Simulation 2018,
який розраховує коефіцієнт запасу втомної міцності за критерієм
Сайнса. Для роботи макросу потрібні результати двох статичних
задач (кроків) у SOLIDWORKS Simulation – для мінімального
(перший крок) і максимального (другий крок) навантаження циклу.
Функція FOS розраховує коефіцієнт запасу втомної міцності за
відомими значеннями головних напружень на першому кроці
(S1_1, S2_1, S3_1) і другому кроці (S1_2, S2_2, S3_2).
Значення границі витривалості зберігається в локальній змінній sn
(МПа). Потрібно також ввести номери вузлів, у яких будуть
розраховуватись значення FOS. У даному прикладі це вузли 6313,
6334, 6349, 198, 186. Перед запуском необхідно вибрати в меню
Tools/References... бібліотеку SOLIDWORKS Simulation 2018 type
library. Макрос можна легко адаптувати і для інших задач.
Наприклад для автоматизації перебудови сітки і запуску обчислення
використовуйте методи Study.MeshAndRun,
Study.CreateMesh() , Study.RunAnalysis.

Attribute VB_Name = "Macro11"
Dim swApp As Object
Dim COSMOSWORKS As Object
Dim CWObject As CosmosWorksLib.CwAddincallback
Dim ActDoc As CosmosWorksLib.CWModelDoc
Dim StudyMngr As CosmosWorksLib.CWStudyManager
Dim Study As CosmosWorksLib.CWStudy
Dim errCode As Long 'код помилки
Dim CWResult As CosmosWorksLib.cwResults
'Dim LBCMgr As CosmosWorksLib.CWLoadsAndRestraintsManager
105