ChangeAnalysisSettings ()
The Function ChangeAnalysisSettings ()
DS. Script. SelectItems (" "+ branchSettings. ID)
For 2=1 To DS. Script. Lv. GroupCount Step 1
DS. Script. Lv. FindGroup (ii) Expand=true
Next
NumStepStr=DS. Script. LocalString (" ID_SolutionStepNumberOfSteps ")
ListView. ActivateItem (numStepStr)
NumSteps=ListView. ItemValue
DS. Script. LvUpdateProps ()
DS. Script. FillTree ()
For 2=1 To DS. Script. Lv. GroupCount Step 1
DS. Script. Lv. FindGroup (ii) Expand=true
Next
Try
For jj=numSteps To Step 1-1
StepNumStr=DS. Script. LocalString (" ID_StepNumber ")
ListView. ActivateItem (stepNumStr)
ListView. ItemValue="" + jj
DS. Script. LvUpdateProps ()
DS. Script. LvWin_OnChange ()
DS. Script. FillTree ()
For 2=1 To DS. Script. Lv. GroupCount Step 1
DS. Script. Lv. FindGroup (ii) Expand=true
Next
ListView. ActivateItem (stepNumStr)
ListView. ItemValue="" + jj
ListView. ActivateItem (" Step End Time ")
ListView. ItemValue="" + jj
ListView. ActivateItem (" Auto Time Stepping ")
ListView. ItemValue="https://bbs.csdn.net/topics/Off"
ListView. ActivateItem (" Define By ")
ListView. ItemValue="https://bbs.csdn.net/topics/Substeps"
ListView. ActivateItem (" the Number Of Substeps ")
ListView. ItemValue="" + 1
For 2=1 To DS. Script. Lv. GroupCount Step 1
DS. Script. Lv. FindGroup (ii) Expand=true
Next
DS. Script. FillTree ()
For 2=1 To DS. Script. Lv. GroupCount Step 1
DS. Script. Lv. FindGroup (ii) Expand=true
Next
Next
Endtry
End the Function
Operation: after missing error: branchSettings
Excuse me what reason be