如题,hmiTriggerTypeAnimationCycle = 5, 定义是能找到的,但是运行时报错,是不是还要这是其他的内容
诡异的是,官方其他触发器都给了示例,就【动画周期】没给,不会是不支持吧。。。。那就难受了
脚本:
Dim objVBScript As HMIScriptInfo
'HMITriggerType
Dim sourceCode As String
Dim objCircle As HMICircle
Dim llll As HMIDynamicCreationType
Set objCircle = ActiveDocument.HMIObjects("Circle")
Set objVBScript = objCircle.Radius.CreateDynamic(hmiDynamicCreationTypeVBScript)
With objVBScript
.Trigger.Type = hmiTriggerTypeAnimationCycle
.Trigger.CycleType = hmiCycleType_250ms
.Trigger.name = "jjjjj"
.sourceCode = "MsgBox ""你好"""
End With
End Sub


