Parametry výpočtu zatěžovacího stavu není možné zadat při jeho vytvoření, ale až následně přes rozhraní existujícího zatěžovacího stavu. Pro získání rozhraní zatěžovacího stavu je třeba nejdříve získat rozhraní 'IModel' a 'ILoads':
Sub test_analysis_parameters()
Dim iApp As RFEM5.ApplicationSet iApp = GetObject(, "RFEM5.Application")
iApp.LockLicense
Dim iMod As RFEM5.IModel3Set iMod = iApp.GetActiveModel
On Error GoTo e
' get interface of loadsDim iLds As RFEM5.iLoadsSet iLds = iMod.GetLoads
' get interface of load caseDim iLc As RFEM5.ILoadCaseSet iLc = iLds.GetLoadCase(1, AtNo)
' get analysis parametersDim param_analy As RFEM5.AnalysisParametersparam_analy = iLc.GetAnalysisParameters
' change analysis parametersparam_analy.Method = Postcriticalparam_analy.ModifyLoadingByFactor = Trueparam_analy.LoadingFactor = 1.5' ...
' set new analysis parametersiLds.PrepareModificationiLc.SetAnalysisParameters param_analyiLds.FinishModification
e:
If Err.Number <> 0 Then MsgBox Err.description, vbCritical, Err.Source
iMod.GetApplication.UnlockLicenseSet iMod = Nothing
End Sub
Pomocí 'ILoads.GetLoadcase' lze získat rozhraní pro určitý zatěžovací stav. Toto rozhraní poskytuje funkce 'GetAnalysisParameters' a 'SetAnalysisparameters', pomocí nichž lze parametry číst a zapisovat.
Stejný postup lze použít i pro kombinace zatížení.