上千个静态文本需要修改动态对话框表达式结果 False对应的背景颜色，请教一下 有没有用VBA脚本批量修改的代码？？

之前在B站Up主HelloWorldWinCC的视频教程是批量修改过触发器(脚本在下面)，我想着既然可以修改触发器，那肯定可以修改表达式结果对应的颜色，在For Each的合集循环里 objMember.Properties("BackColor").Dynamic.后面怎么改可以实现修改动态对话框表达式结果 False对应的背景颜色？？？？？？

Sub ChangeTrigger()

On Error Resume Next

Dim objResult, objMember, objCount

    Set objResult = ActiveDocument.HMIObjects.Find(ObjectName:="*", ObjectType:="HMIStaticText")

    objCount = objResult.Count

    MsgBox "对象的数量：" & CStr(objCount)

        For Each objMember In objResult

        objMember.Properties("BackColor").Dynamic.Trigger.VariableTriggers(1).CycleType = 0

        objMember.Selected = True

        Next objMember

        MsgBox "操作完成："

End Sub